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ABSTRACT 

CONTROLLERS WITH AN RATT~TB (RASSBUS SIMULATOR) ATTACHED 


TO GET MAXIMUM RESULTS FROM THE TEST ALLOW PASS1 TO BE 
COMPLETED SO THAT ALL INFORMATION POSSIBLE HAS BEEN RE- 
PORTED ABOUT ANY ERROR, THEN LOOP ON DESIRED ERRORS. 

IN THE EVENT OF AN ERROR, INORDER TO GIVE COMPLETE 
INFORMATION ALL ERROR BITS ARE CHECKED TO SEE THAT 

NO OTHER ERROR OCCURED. IF AN ERROR OCCURED IT WILL 

BE REPORTED BY ‘WHYFO'' AND ‘WWATBIT’ 

WHYFO TELLS WHAT REGISTER THE ERROR BIT WAS FOUND IN AND 
WATBIT TELLS WHAT THE NUMBER OF THE ERROR BITS 

WHERE . 

EXAMPLE : 

RHCS1 HAS AN ERROR BIT SET 


oe THE NUMBER OF THE EXTRA BITS 


RHCS2 HAS AN ERROR BIT SET 
aaa ARE THE NUMBER OF THE EXTRA BITS 


END EXAMPLE 


THIS PRINTOUT SAYS THAT TRE AND SC _IS SET IN RHCS1 
AND THAT DATA LATE WAS SET IN RHCS2. 


SEQ 0002 
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2.0 
2.1 


2.2 


3.0 


THIS IS DONE TO GIVE ONLY VALID DATA(ERROR) 
NOT A COMBINATION OF GOOD AND BAD DATA. 
REQUIREMENTS 


HARDWARE 


THIS PROGRAM ASSUMES THE FOLLOWING IS IN PROPER WORKING 
CONDITION: 


1. CPU 

2. 16K OF CORE MEMOR 

3. RH11-TB MASSBUS SUMULATOR 
SOF TWARE 


USING STARTING ADDRESS 200 ASSUMES A BASE ADDRESS OF 
160100 AND A VECTOR OF 774. THE PROGRAM 
ADDITIONAL RHYS AT ADDRESSES 160200, by AND 160400 


WILL DO MULTIPLE as meer’ MULTIPLE RH TESTING (SEE 
TEST 77) IS NOT POSSIBLE AT tpt stg OTHER THAN THE 
FOUR ADDRESSES AT 120100 THRU 160400. 


F_ NO CHANGES IN ADDRESS ARE MADE AN ALTERNATE STARTING 
ADDRESS OF 204 CAN BE USED BUT THE PROGRAM MUST HAVE BEEN 
STARTED AT LEAST ONCE AT ADDRESS 200 OR 210. 

STARTING ADDRESS 210 ALOWS YOU TO SPECIFY THE BASE 
ADDRESS, VECTOR ADDRESS, AND HOW MANY REGISTERS YOU 
ARE JUMPERED FOR. THE NUMBER OF REGISTERS JUMPERED 
REFERS TO THE NUMBER OF DEVICE REGISTERS (OCTAL) 

BEGINNING WITH RHCS1 UP TO BUT NOT INCLUDING RHBAE. 
a AR AT A TIME CAN BE TESTED USING STARTING 


IF A_HARDWARE SWITCH REGISTER DOES a. EXIST, THE PROGRAM WILL 
or THE CONTENTS OF LOCATION 176 AS VALUE OF THE SWITCHES. 
THE PROGRAM WILL PRINT OUT THE PRESENT. CONTENTS OF THE 
SOFTWARE SWITCH REGISTER WHEN THE PROGRAM IS STARTED. IT 
WILL THEN ASK FOR THE NEW CONTENTS TO BE INPUT TO THE SOFTWARE 
SWITCH REGISTER. TYPE CARRIAGE RETURN TO FINISH INPUT. 


PROGRAM DESCRIPTION 


THIS PROGRAM WAS ASSEMBLED WITH MACY11 USING PDP-11 MAINDEC 
SYSMAC PACKAGE (DZQAC-3). 


IN TESTING ONE CONTROLLER, THE FIRST PASS TAKES ABOUT 
5 SECONDS AND SUBSEQUENT PASSES TAKE ABOUT 10 MINUTES 
IF ITERATIONS ARE NOT INHIBITED. 

SWITCH OPTIONS 


SWITCH USE 


SEQ 0003 
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HALT ON ERROR 


LOOP ON TEST 

INHIBIT ERROR ra 
INHIBIT ITERATION 

BELL ON Soon 

LOOP ON ERR 

LOOP ON Test IN SWR<7:0> 

TO BE USED IF DUAL PORT USED 

INHIBITS THE PRINTING OF WATBIT 

SOIC IOIOIOIOINISICISISISIOIOIOIOIOIOIOISIDIOIIOISIIOIOIOIDIOIOIOIOIOIOIIOIOIOII III IOI ITT EI ITE 


13,8.AND 0 INHIBIT WATBIT PRINTOUT 


Totti Eri tect itt it titi i itt ittit i ittiti iii tittitiiiiiiiiiiiitiiiii sy) 
3.2 SYSMAC ROUTINES (USED) 


EQUATE, CATCH, COMMON TAGS, SWRHI, SWRLO, SETUP SCOPE, 

TYPE, TRAP, eA BITS 
ARE CLEARED AFTER THE CLEAR BIT WAS LOADED INTO 
RHCSS” REGISTER. THIS TEST IS ALSO ENTERED AT THE 
LABLE CLEER AT THE END OF ALL THE ERROR BIT TESTS 
TO SEE THAT A CLEAR WILL CLEAR THE ERROR BIT SET. 
THE TEST IS ENTERED HERE IF THE ERROR BIT BEING 
a te ieee NOT SET TO SEE IF ANY OTHER ERROR 


TEST 3 = THIS TEST SEES IF THE TESTER IS CONNECTED. THIS 
TEST SEES IF THE DEVICE CODE IS A 40 TO SAY AN 
RH SIMULATOR IS ATTACHED. 


TEST 4 = WC CLEAR TEST. THIS TEST WILL SEE THAT WHEN 
a IS GIVEN THE WORD COUNT REGISTER REMAINS THE 


aad enh oud anh and 
O-WDO0O-"WEUW 





TEST 5 ~ RHBA CLEAR TEST. THIS TEST SEES THAT WHEN A CLEAR 
IS GENERATED THE BUS ADDRESS REGISTER IS CLEARED. 


TEST 6 - RHBAE CLEAR TEST. THIS TEST CHECKS THAT WHEN A 
CLEAR 1S GENERATED THE BUS ADDRcSS EXTENSION REG- 
ISTER IS CLEARED. 
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TEST 7 = RHDB CLEAR TEST. THIS TEST CHECKS THAT WHEN A 


TEST 


TEST 


TEST 


CLEAR IS GENERATED OUT)°UT READY IS NEGATED 


- PROM REGISTER DECODE TEST. THIS TEST CHECKS 
THAT THE PROM CAN ACCESS ALL REGISTERS. 


- RHCS3 TEST. THIS TEST CHECKS THE “ae a, BITS 
IN THE RHCS3 REGISTER CAN BE CLEARED AND SET 


~ RHWC BIT TEST. THIS TEST CHECKS THE WORD COUNT 
ag TO SEE IF ALL BITS CAN BE SET AND CLEARED 

CHECKS THE meets ies SING ALTERNATE BITS SET 
(32595) AND USING (125252) TO MAKE SURE IT WORKS 
WITH ALTERNATE PATTERN. 


5 = RHBAE BIT TEST. THIS TEST TESTS THE RHBAE REG- 


ISTER ONLY IF THE RH IS AN RH70. RH11’°S DO NOT 
HAVE AN RHBAE REGISTER. 


~ RHBA BIT TEST. THIS TEST TESTS THE BUS ADDRESS 
REGISTER BY FIRST ALTERNATLY SETTING AND CLEARING 
BITS IN THE BA REGISTER AND THEN BY USING AN 
ALTERNATE BIT PATTERN (52525) AND AN OPPOSITE 
BIT PATTERN (125252). 


~- RHDB BIT TEST. THIS TEST TESTS THE RH DATA BUF- 
FER REGISTER BY FIRST ALTERNATLY SETTING AND RE- 
SETTING BITS IN THE RHDB REGISTER AND THEN BY USING 
AN_ALTERNATE BIT PATTERN (52525) AND AN OPPOSITE 
ALTERNATE BIT PATTERN (125252). 


~ RHWC OPERATIONAL TEST. THIS TEST CHECKS THAT 
WHEN THE WORD COUNT REGISTER IS INCREMENTED IT IS 
CARRIED TO THE HIGHEST BIT AND IS RETURNED TO ZERO. 


- RHBA OPERATIONAL TEST. THIS TEST CHECKS THAT 

THE BUS ADDRESS pag a WILL CARRY THROUGH TO 
THE HIGHEST BIT_IN THE BUS ADDRESS EXTENSION REG- 
ISTER OR BIT Al7 IN THE RHCS1 REGISTER AFTER IT IS 
INCREMENTED. 


~ NEM, TRE, SC BIT TEST. THIS TEST WILL CHECK 
THAT NON-EXISTING MEMORY WILL SET THE TRE AND SC 
BIT IN RHCS1 REGISTER. 


- WCE, TRE, SC BIT TEST. THIS TEST WILL CHECK 
a AND SC SET WHEN A WRITE CHECK ERROR OCCURS 


- MDPE, TRE AND SC BIT TEST. THIS TEST CHECKS 
THAT MDPE CAN BE SET IN RHCS2, AND THAT MDPE SETS 
TRE AND SC IN THE RHCS1 REGISTER. 


- UPE, TRE, SC ERROR TEST (RH11). THIS TEST CHECKS 
THE UPE BIT_IN RHCS2 TO SEE IF IT SETS AND WHEN IT 
IT SETS IS TRE AND SC BITS SET IN RHCS1. 
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SEQ 0006 


TEST 24 = UPE, TRE, SC ERROR TEST (RH70). THIS TEST CHECKS 
THE UPE BIT_IN RHCS2 70 SEE IF IT SETS AND WHEN 
IT SETS IS TRE AND SC BITS SET IN RHCS1. 


TEST 25 = NED BIT TEST. THIS TEST WILL CHECK THAT NED 
(NON-EXISTANT DRIVE) SETS TRE AND SC BITS IN RHCS1. 


TEST 26 = MXF, TRE AND SC BIT TEST. THIS TEST WILL gy 
ng MxF (MISSED TRANSFER ERROR) WILL SET TRE AND 


TEST 27 = PGE ERROR BIT TEST. THIS TEST FORCES PGE TO 
A an RHCS2 AND VERIFYS TRE AND SC IS SET IN 


TEST 30 - MXF, TRE AND SC BIT TEST (RH11 ONLY). THIS TEST 
SEES IF MXF CAN BE SET BY A MOVE INSTRUCTION AND 
THAT TRE AND SC ARE SET IN RHCS1. MXF CAN BE SET 
ag AI AN RH11 BIT CAN NOT BE SET THIS WAY 
N . 


TEST 31 = MCPE AND SC ERROR TEST. THIS TEST CHECKS THAT 
ie — BE SET IN RHCS1 AND THAT MCPE SETS SC 


TEST 32-52 = DOUBLE TESTS. THESE TESTS 
CHECK DBL IN RHCS3 WITH READ FWD AND REV, WRITE 
FWD AND REV AND WITH BAI SET IN RHCS2. OPERATION 
BEING PERFORMED WILL BE PRINTED OUT IN ERROR 
MESSAGE. RH70 ONLY. 


TEST 53 = WCE EW ERROR TEST. THIS TEST CHECKS THAT WCELO 
WILL SET IN RHCS3 AND THAT WCE SETS IN RHCS1. IT 
ALSO CHECKS THAT WCEHI an NOT SET WITH WCELO 
IN WHSS...c 00000 RH70 ONLY 


SS SSS EES UUUE TRYIN EAE RRAN SEY 


310 TEST 54 - WCE OW ERROR TEST (WCEHI). THIS TEST CHECKS THAT 
311 WCEH] SETS IN RHCS3 AND THAT WCE SETS _IN RHCS1, IT 
312 ALSO TESTS THAT WCELO DOES NOT SET WITH WCEHI. 

a (RH70 ONLY) 

315 TEST 55 = INTERRUPT ENABLE TEST. THIS TEST VERIFYS THAT 
316 IE WiLL SET IN nen AND IT WILL CAUSE AN INTERRUPT 
Ea WHEN RDY IS SET 

319 TEST 56-75 - READ AND WRITE OPERATIONAL TESTS. THESE wea 
320 VERIFY ALL READ AND WRITE CODES WHETHER IT BE A 

321 READ REV. OR FWD OR A WRITE REV. OR FWD. DURING 
322 THESE TESTS THE TESTER TIMING IS MARGINED AND 

4 NO ERRORS SHOULD OCCUR. 


325 TEST 76 = THIS IS THE LARGE TRANSFER TEST , IT TESTS 
326 a BL 70 UX 11 DOING A 671 WORD TRANSFER FOR 
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TEST 77 = THIS IS NOT A TEST BUT IS THE ROUTINE THAT 


ALLOWS THE DIAGNOSTIC TO TEST 4 RH*S IF PRESENT. 


PARR ARASASASAAALALALLLALASE LARA ERAS ESE SSS SY 


ECO HISTORY 
CHGE1 = ADDED CODE TO MAKE BOTH WRITE LOC’S IDENTICAL 
CHGE2 = CHANGED BIT8 FROM LOC TO DATA REFERENCE 
CHGE3 = CHANGED BITO FROM LOC TO DATA REF ERENCE 
Be Se STA Re ete te he ete 
CHGF1 = ADDED SOFTSWR TO .SETUP MACRO 
CHGF2 = ADDED GETSWR FOLLOWING SETUP 
CHGF3 = ADDED JSR PC,$TKINT FOLLOWING GETSWR 
CHGF4 = ADDED ,X,8.,200 TO .SREAD ARGUMENTS 


EERERRERERERERER EERE EERE ERR RR ek 


-TI7LE MASSBUS RH70 AND RH11 DIAGNOSTIC 
;*COPYRIGHT (C) 1979 

2 *DIGITAL EQUIPMENT CORP. 

SAVORS, MASS. 01754 


: #PROGRAM BY WN D'ENTRE™ONT 


< ATHIS PROGRAM WAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
s SPACKAGE (MAINDEC-11-DZQAC-C3), JAN 19, 1977. 


* SBTTL OPERATIONAL SWITCH SETTINGS 


* 

7* SWITCH USE 
tt 
3@ 15 HALT ON ERROR 

:* 14 LOOP ON TEST 

oe 13 INHIBIT ERROR TYPEOUTS 
38 11 INHIBIT ITERATIONS 

se 10 BELL ON ERROR 

:* OOP ON 


ERROR 
LOOP ON TEST IN SWR<7:0> 
* SBITL BASIC DEFINITIONS 


“ik ye aaa OF THE STACK POINTER *** 750 *«* 
-EQUIV EMT,ERROR ;:BASIC DEFINITION OF ERROR CALL 
-EQUIV JOT,SCOPE ;sBASIC DEFINITION OF SCOPE CAi.L 


tates taateae DEFINITIONS 
11 ::CODE FOR 4q7yry TAB 

tre 12 + ¢ CODE FOR LINE FEED 

CR= 15 :CODE FOR CARRIAGE RETURN 

CRLF= 200 >:CODE FOR CARRIAGE RETURN-LINE FEED 


SEQ 0007 
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CZRHBF.P11 = 26=JUL=79 10:13 BASIC DEFINITIONS SEQ 0008 
385 177776 PS= 177776 ::PROCESSOR STATUS WORD 
386 .EQUIV PS,PSW 
387 177774 STKLMT= 177776 ziSTACK LIMIT REGISTER 
388 177772 PIRQ= 177772 ::PROGRAM INTERRUPT REQUEST REGISTER 
389 177570 DSWR= 177570 > HARDWARE SWITCH REGISTER 
390 177570 DDISP= 177570 t HARDWARE DISPLAY REGISTER 
392 :*GENERAL PURPOSE REGISTER DEFINITIONS 
393 RO= 40 7:GENERAL REGISTER 
3 600001 Ri= %1 [GENERAL REGISTER 
395 000002 R2= %2 GENERAL REGISTER 
3 000003 R3= 13 +: GENERAL REGISTER 
397 000004 R4= 14 ‘GENERAL REGISTER 
398 000005 R5= “5 t:GENERAL REGISTER 
399 000006 R6= 16 >: GENERAL REGISTER 
400 000007 R7= 47 t:GENERAL REGISTER 
401 000006 SP= 16 ::STACK POINTER 
402 000007 PC= 47 + :PROGRAM COUNTER 
404 :*PRIORITY LEVEL DEFINITIONS 
405 000000 = : PRIORITY LEVEL 0 

000040 PRi= 40 + :PRIORITY LEVEL 1 
407 000100 PR2= 100 S:PRIORITY LEVEL 2 
408 000140 PR3=  —s-:1140 ‘PRIORITY LEVEL 3 
409 000200 PR4= 200 * PRIORITY LEVEL 4 
410 000240 PRS= 240 + PRIORITY LEVEL 5 
411 000300 PR6= 300 +:PRIORITY LEVEL 6 
412 000340 PR7= 340 PRIORITY LEVEL 7 
414 :*' SWITCH REGISTER’’ SWITCH DEFINITIONS 
415 100000 Sw15= 100000 
416 040000 SWw14= 40000 
417 020000 SW13= 20000 
418 010000 SWi2= 10000 
419 000 SWi1= 4000 
420 002000 SW10= 2000 
421 001000 swo9= 1000 
422 000400 SwO8= 400 
423 000200 SwO7= 200 
424 000100 Sw06= 1 
425 000040 sw0S= 40 
426 000020 Sw04= 20 
427 000010 SwO3= 10 
428 000004 SwO2= 

000002 SwOl= 2 
430 000001 swoo= 1 
431 EQUIV SwWO9,Sw9 
432 “EQUIV SWO8.SW8 
433 “EQUIV SWO7.SW7 

“EQUIV SW06 
435 “EQUIV SWOS.SW5 
EQUIV SWw04. 

437 “EQUIV SWO3.SW3 
4 EQUIV SWO2.SW2 
439 “EQUIV SWwO1.SW1 
440 EQUIV Sw00.SWO 
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CZRHBF P71 MG-JUL=79 10:13 BASIC DEFINITIONS SEQ 0009 
44) 
442 ;*DATA BIT DEFINITIONS (BITOO TO BIT15) 
648 100000 B1T15= 100000 
444 040000 BIT14= 40000 
445 020000 B1T13= 20000 
446 010000 BIT12= 
447 000 BIT11= 
448 002000 BIT10= 2000 
449 001000 BITO9= 1000 
450 00 BITO8= 400 
451 000200 BITO7= 
452 000100 BIT96= 100 
453 0 BITO5= 
454 000020 BITO4= 20 
455 000010 BITO3= 10 
456 000004 BITO2= 4 
457 000002 BITOI= 2 
458 000001 = 1 
459 -EQUIV BITO9,BIT9 
-EQUIV BIT08,BIT8 
461 -EQUIV B1T07,BIT7 
462 -EQUIV B1T06,BIT6 
463 -EQUIV 81T05,B1T5S 
-EQUIV BIT04,BIT4 
465 -EQUIV BITO3,BI1T3 
466 -EQUIV BITO2,BIT2 
467 “EQUIV B1T01,B1T1 
rr -EQUIV BITOO.BITO 
470 ;*BASIC *'CPU"* TRAP VECTOR _ADDRESSES 
471 000004 ERRVEC= 4 TIME OUT AND OTHER ERRORS 
472 000010 RESVEC= 10 3 URESERVED AND ILLEGAL INSTRUCTIONS 
473 000014 TBITVEC=14 a Ue 
474 000014 TRTIVEC= 14 7: TRACE TRAP 
475 006014 BPTVEC= 14 ; sBREAKPOINT TRAP (BPT) 
476 00020 IOTVEC= 20 he hh 9 tt TRAP (IOT) **SCOPE** 
477 000024 PWRVEC= 24 :sPOWER FAIL 
478 C00030 EMTVEC= 30 : sEMULATOR TRAP (EMT) **ERROR** 
479 000034 TRAPVE C= 3" 'TRAP’' TRAP 
480 000060 ke 60 Z:TTY KEYBOARD VECTOR 
481 000064 PVEC= 64 z;TTY PRINTER VECTOR 
482 000240 PIROVEC=240 z:PROGRAM INTERRUPT REQUEST VECTOR 
= -SBTTL TRAP CATCHER 
485 000000 -=0 
486 3*ALL UNUSED LOCATIONS FROM 4 - 776 CONTAIN A ‘'.+2,HALT'' 
487 ;*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
rr 000174 LOCATION, 9 CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 
490 000174 000000 DISPREG: .WORD 0 2 sSOFTWARE DISPLAY REGISTER 
491 000176 000000 SWREG: .WORD 0 2sSOFTWARE SWITCH REGISTER 
492 ~SBTTL STARTING ADDRESS(ES) 
493 000200 000137 004176 JMP @4BEGINI 3: JUMP TO STARTING ADDRESS OF PROGRAM 
494 000204 -=204 
495 000204 000137 004144 JMP @4BEGIN 
496 000210 -=210 
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CZRHBF.P11 = 26-JUL-79 10:13 STARTING ADDRESS(ES) SEQ 0010 
497 000210 000137 004152 JMP ——_@MBEGINS 
498 ss RARER EEREEEEEEEEEEREKEREKEEEEERREEEEREARHEKREREREEKRERERARRRERE 
499 “SBTTL MEMORY MANAGEMENT DEF INITIONS 
501 :*KT11 VECTOR ADDRESS 
508 000250 MMVEC= 250 
505 ;*KT11 STATUS REGISTER ADDRESSES 
507 177572 SRO= 177572 
508 177574 SRI= 177574 
509 177576 SR2= 177576 
510 172516 SR3= 172516 
512 :*KERNEL "‘I'' PAGE DESCRIPTOR REGISTERS 
514 172300 KIPDRO= 172300 
515 172302 KIPDRI= 172302 
516 172304 KIPDR2= 172304 
517 17 KIPDR3= 172306 
518 172310 KIPDR4= 172310 
519 172312 KIPDRS= 172312 
520 172314 KIPDR6= 172314 
521 172316 KIPDR7= 172316 
354 ;*KERNEL “‘I'' PAGE ADDRESS REGISTERS 
525 172340 KIPARO= 172340 
526 172342 KIPARI= 172342 
527 172344 KIPAR2= 17234 
$28 1 KIPAR3= 172346 
529 172350 KIPAR4= 172350 
530 172352 KIPARS= 172352 
531 172354 KIPAR6= 172354 
532 172356 KIPAR7= 172356 
534 FF AAR EEKEKKEKEKEKRKEKEKEEEEKEEKEEEKEEKREREKEREKEKEEKKEEEKEEEKK 
232 “SBTTL ACT11 HOOKS 
537 FF REAR REKEKEKKREEEKEKEKEKEKEKEEKKEEEREEKREKEEEKEEEKEEKEKKEKEEKEK EK 
538 sHOOKS REQUIRED BY ACT11 
$39 000214 SSVPC=. ;SAVE PC 
540 000046 .=46 
$41 000046 046376 SENDAD :1)SET LOC.46 TO ADDRESS OF SENDAD IN .$EOP 
542 000052 .=52 
543 000052 000000 “WORD 0 :22)SET LOC.52 TO ZERO 
544 000214 . | =$SVPC i: RESTORE 
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-SBTTL COMMON TAGS 


LL RRRARRAARRA REE AERA REAR ERR AERA RA RARER RRERR ERRATA ER 
z*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
;*USED IN THE PROGRAM. 


SCMTAG: zSTART OF COMMON TAGS 
SPASS: 5 OO TAINS PASS COUNT 
ONTAINS THE a NUMBER 
TAINS ERROR F 


22 CONTAINS SUBTEST ITERATION COUNT 
TAINS SCOPE LOOP ADDRESS 


2 CONTAINS ITEM CONTROL A 4 E 
AINS - ERRORS TEST 
LAST ERROR ++ aca 


S OF 
ss CONTAINS ADDRESS OF "BAD" DATA. 
AS ATA 

3 TAINS “*BAD' DATA 

7 :RESERVED--NOT TO BE USED 


; AUTOMATIC MODE INDICATOR 
z. INTERRUPT MODE INDICATOR . 


2 ADDRESS OF SWITCH REGISTER 
2 sADDRESS OF wa REGISTER 
KBD STATUS 


TTY KBD BUFFER 
SHTTy PRINTER eee REG. ADDRESS 
zeTTy PR R RE 
:- CONTAINS OR FILLS 
7sCONTAINS # OF FILLER CHARACTERS wht 
22 INSERT FILL CHARS. AFTER A ‘LINE FEED** 

Ty NAL _AV. AILABLE chon (BI T<07>=0=YES) 


— —bateaicitabubebubababababal 
SRRVSSETRVSKRALSS 


jeleleleleleleleleler jelelelelele) ala) 


S3 
aS 


N 


bt A tt spahes — 
RAVNSKRR SNR 


SSRSS 


N 
NO 
OooCooocococo0ec0oo CO—-NO 


tot DEF INED 
NUMBER OF ITERATIONS 
i ZESCAPE ON ERROR ADDRESS 
+» teeth 33 CODE FOR BELL 


SQUES: .ASCI1 2 QUESTION MARK 
SCRLF: .ASCII <i5> 7: CARRIAGE RETURN 


Sesssssssssssssss 


™ 
WNO 
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CZRHBF .P11 26-JUL-79 10:1 COMMON TAGS SEQ 0012 
601 001224 000012 SLF: eASCIZ <12> 7zLINE FEED 
602 eri iiitti titi iii iit riiti titi iis) 


MASSBUS 
CZRHBF .P11 


603 
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055074 
067636 
072004 
072350 
055134 


067756 


072016 
072354 


055174 
070077 
072030 
072360 
055250 
070217 
072042 
072364 
055310 
070337 
072054 
072370 
055361 
070337 
072054 
072370 
055575 
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ERROR POINTER TABLE 
-SBTTL ERROR POINTER TABLE , 
;*THIS TABLE CONTAINS THE INFORMATION FOR gt ERROR as CAN OCCUR. 


z*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 
:sLOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE ih # ;. PERTINENT. 


; *NOT 
: *NOTE2: 


D 
7 ITEM 2 
EM2 


D 
7 ITEM 3 
EM3 
D 
ZITEM 4 
D 
7 ITEM 5 


D 
7 ITEM 6 
EM6 


IF SITEMB IS 0 THE ONLY PERTINENT DATA IS (SERR 
EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 


z:POINTS TO THE ERROR MESSAGE 
3sPOINTS TO THE DATA HEADER 
zzPOINTS TO THE DATA 
:sPOINTS TO THE DATA FORMAT 


ZCORRECT BIT DID NOT SET 
7 IN RH WORD COUNT REGISTER 


; CORRECT BIT DID NOT SET 
: IN BUS ADDRESS EXTENTION 
REGISTER 


CORRECT BIT DID NOT SET 
7IN BUS ADDRESS REGISTER 


CORRECT BIT DID NOT SET 
: IN RHDB REGISTER 


zNED DID NOT SET IN 
:RHCS2 REGISTER © 


NEM LOGIC TO SET TRE 
, zAND SC BITS IN RHCS1 
1S NOT WORKING 


ZNEM BIT DOES NOT READ AS SET 


SEQ 0013 
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CZRHBF P11 26-JUL-79 10:13 ERROR POINTER TABLE SEQ 0014 
659 001310 970337 DHS 
660 001312 072054 DTS 
661 001314 072370 DFS 
662 7 1TEM 10 
663 001316 055643 —EM10 ;TRE BIT SET BUT NEM 
664 ;AND SC ARE NOT? 
665 001320 070237 DHS 
666 001322 072054 DTS 
667 001324 072370 DFS 
668 sITEM (11 
669 001326 055677 EM11 3SC BIT SET BY ATTN OR MCPE 
670 ;ERROR OR SC IS SHORTED 
671 ;SHOULD HAVE BEEN SET BY NEM AND TRE 
672 001330 070444 DH11 
673 001332 072066 DT11 
674 001334 072374 DF11 
675 sITEM 12 
676 001336 055740 EM12 ;TRE BIT SET BY NEM BUT S 
677 [DID NOT SET, LOGIC BETWEEN 
678 ; TRE AND SC NOT WORK ING 
679 001340 070337 DHS 
680 001342 072054 DTS 
681 001344 072370 DFS 
682 
683 sITEM = 13 
684 001346 055760 —EM13 ;TRE BIT IS SET BUT SC 
685 TREADS AS CLEARED. SC 
686 ;LOGIC ASSOCIATED WITH TRE 
687 “BIT IS NOT WORKING OR SC 
688 HAS AN OPEN GOING TO THE BUS 
689 001350 070337 DHS 
690 001352 072054 DTS 
691 001354 072370 DFS 
692 
693 :ITEM 14 
694 001356 056027 EM14 ;WCE BIT DID NOT SET, BIT 14 IN 
695 sRHCS2 
696 
697 001360 070337 DHS 
698 001362 072054 DTS 
699 001364 072370 DFS 
700 
701 ZITEM = 15 
702 001366 056053 EM15 ;WCE BIT DID NOT SET BUT 
703 ;TRE AND SC IN RHCS1 ARE 
704 SET. 
705 
706 001370 070337 DHS 
707 001372 072054 DTS 
708 001374 072370 DF5 
709 
710 ;ITEM 16 
711 001376 056077 EM16 ;WCE AND SC ERROR BITS ARE 
712 :SET TRE ERROR BIT SHOULD ALSO 
713 ‘BE SET BUT IT READS AS CLEARED 


714 THERE MIGHT BE AN OPEN BETWEEN 









MASSBUS RH70 AND RH11 
CZRHBF .P11 26~JUL~ 
715 
716 
717 001400 070337 
718 001402 072054 
ak 001404 072370 
721 001406 056117 
722 
723 
724 
725 
726 
727 
728 
729 001410 070337 
730 001412 072054 
731 001414 672370 
732 
733 
ft 2) 001416 056166 
736 001420 070337 
737 001422 072054 
738 001424 072370 
739 
740 
741 001426 056217 
742 
743 
744 
745 
746 1430 070337 
747 001432 072054 
748 001434 072370 
749 
750 
751 001436 056246 
752 
753 
754 
755 001440 070337 
756 001442 072054 
757 001444 072370 
758 
759 
760 001446 056301 
761 
762 
763 
764 
765 001450 070337 
766 001452 072054 
767 001454 072370 
768 
769 
770 001456 056320 


D 
79 


ay TIC 


s ITEM 


: ITEM 


s ITEM 


: ITEM 


7 ITEM 


; ITEM 


s MACY11_ 30A(1052) 
0:13 ERROR POINTER TABL 


739 PAGE 16 


TRE AND THE BUS 


WCE AND TRE ARE SET BUT 
:SC BIT READS AS CLEARED 
:LOGIC BETWEEN TRE AND SC 


:BU OK ON 
NON-EXISTENT MEMORY TEST 
WHICH PRECEDED THIS TEST 


;UPE DID NOT SET IN RHCS2 


TRE AND SC BITS ARE SET 
sEITHER UPE HAS AN OPEN GOING 
:TO BUS OR TRE AND SC WAS 
SET BY ANOTHER ERROR 


;TRE BIT IS SET, UPE AND SC 
;SHOULD ALSO BE SET BUT THEY 
READ AS CLEARED 


TRE ARE SET BUT 
NOT SET, LOGIC TO 
ony NOT SEEM TO 


NED DID NOT SET IN RHCS2 





SEQ 0015 


MASSBUS RH70 AND RH11 DIAGNOSTIC MACY11 phe prme- -79  f :39 PAGE 17 

CZRHBF .P11 26-JUL-79 10:13 ERROR POINTER T SEQ 0016 
771 
772 001460 070337 DHS 
773 001462 072054 DTS 
we 001464 072370 DFS 
776 sITEM = 25 
777 001466 056351 EM25 ; TRE AND SC ARE SET 
778 ‘BUT THEY SHOULD HAVE BEEN 
779 :SET BY NED WHICH READS 
7” SAS CLEARED 
782 001470 070337 DHS 
783 001472 072054 DTS 
Lo 001474 072370 DFS 
786 sITEM 26 
787 001476 056403 EM26 ; TRE BIT SET BUT NED 
788 SAND SC BITS READ AS 
789 ;CLEARED. NED SHOUL 

SHAVE SET CAUSING TRE 

791 3TO SET WHICH IN TURN 
792 :SET SC. LOGIC NOT WORK 
at, ING CORRECTLY 
795 001500 070337 DHS 
796 001502 072054 DTS 
797 001504 072370 DFS 
798 
799 sITEM =.27 
800 001506 056431 EM27 TRE BIT WAS NOT SET 
801 [BY NED. TRE SET LOGIC 
802 001510 070337 DHS zNOT WORKING 
803 001512 072054 DT5 
ae 001514 072370 DFS 
806 s1TEM 30 
807 001516 056464 EM30 :MXF BIT DID NOT SET 
pote IN RHCS2 
810 001520 070337 DHS 
811 001522 072054 DT5 
aig 001524 072370 DFS 
814 sITEM) (31 
815 001526 056521 EM31 ;MXF BIT SHOULD BE SET 
816 : IN RHCS2 BUT IT READS AS 
817 ;CLEARED. TRE AND SC ARE SET 
a9 : IN RHCS1. 
820 001530 070337 DH5 
821 001532 072054 DTS 
822 001534 072370 DFS 
823 
824 o sITEM = =32 
825 001536 056560 EM32 ;TRE BIT IS SET BUT MxF 


826 zAND SC READ AS CLEARED 


MASSBUS RH70 AND RH11 ey ot hoe 


CZRHBF .P11 26-JUL-79 1 
827 
828 001540 070337 
829 001542 072054 
830 601544 072370 
831 
832 ; ITEM 
833 001546 056607 
834 
835 
836 
837 
838 
839 001550 070337 
840 001552 0720544 
841 001554 072370 
842 
843 : ITEM 
844 001556 056657 
845 
846 
+4 001560 070532 
aoe 001562 072076 
851 001564 072377 
852 
853 : ITEM 
854 001566 056727 
855 
856 
857 001570 071665 
858 001572 072326 
859 001574 072374 
860 
861 : ITEM 
43 001576 056761 
ne 001600 070612 
a6 001602 072112 
868 001604 072403 
869 
870 7 1TEM 
al 001606 057017 
384 001610 070607 
24 001612 072106 
877 001614 072402 
878 
879 7 1TEM 
880 001616 057050 
881 
882 


MACY11 30A(1052) 
ERROR POINTER TABLE 


E 2 
10:39 PAGE 18 


s;MXF AND SC BITS ARE INCORRECT 


TRE LOGIC ASSOCIATED WITH 
SMXF IS NOT WORKING 
2 TRE | ys AS CLEARED 


HAS AN OPEN GOING 
:TO THE BUS 


s TESTER IS NOT CONNECT 


TO THE MASSBUS DEVICE 
: CODE SHOULD BE A 40 
PC TEST NO. DEVICE CODE 


sSERRPC,STSTNM,DT.0 
70.0,0 


;BIT IN RHCS3 WILL NOT ET 


PC TEST NO. FAILING ADDRESS 
7 SERRPC ,STSTNM,RHCS1,0 
30.0,06 


DLT DID NOT SET IN RHCS2 


:DLT IS NOT SET IN RHCS2 BUT 
;TRE AND SC READ AS SET.TRE 
AND SC MUST HAVE BEEN SET BY A DIFFERENT ERROR 


SEQ 0017 


MASSBUS RH70 AND RH11 Ser ps he 


CZRHBF .P11 26-JUL-79 10:1 


883 


070607 
072106 
072402 


057210 


070675 
072122 
072406 


057313 


057430 


000000 
000000 
000000 
057522 
000000 


000000 
000000 


057575 
000000 
000000 
000000 


057656 
000000 


MACY11 30A(1052) 
ERROR POINTER TABL 


; ITEM 


; ITEM 


; ITEM 


; ITEM 


ZITEM 


ZITEM 


Z ITEM 


EM42 


oOoomnr OOO 
=“ 
WN 


“w > 


ooo mr OOO 
=° 
Oo 


N 


Fo2 
26-JUL-79 *.10:39 PAGE 19 


OUTPUT READY IN RHCS2 
;DID NOT SET 


PC TEST NO. 
;SERRPC,$TSTNM,O 


;ALL_BITS DID NOT LOAD INTO RHWC 
3 (177777) 


;RHWC DID NOT LOAD ANY BITS (177777) 


;RHWC 
;SOME BITS CLEARED AFTER CLEAR 
zWAS LOADED INTO RHCS2 


;NON-EXISTANT MEMORY BIT 
SET IN RHCS2 


:RHBA DID NOT CLEAR AFTER CLR 
:WAS LOADED INTO RHCS2 


zALL BITS DID NOT LOAD INTO 
;RHBA REGISTER (177776) 


SEQ 0018 | 


G 2 
MASSBUS RH70 AND RH11_DIAGNOSTIC MACY11 30A(1052) 26-JUL=79 10:39 PAGE 20 





CZRHBF .P11 26-JUL-79 10:13 ERROR POINTER TABLE SEQ 0019 
939 001712 OC0000 0 
a 091714 000000 0 
942 sITEM = 50 
943 001716 057727 EMSO ;LOADING TRE AFER ITS SET DOES NOT 
944 ;CLEAR ERRORS 
945 001720 000000 0 
946 001722 000000 0 
947 001724 000000 0 
948 
949 : ITEM 51 
950 001726 060006 —EMS1 3PGE DID NOT SET IN RHCS2 
951 001730 000000 0 
952 001732 000000 0 
953 001734 000000 0 
954 
955 sITEM 52 
956 001736 060037 EMS2 ; THE PROM WHILE ACCESSING A 
957 [REGISTER WHICH YOUR TESTER 
958 ; CANNOT SUPPLY INFORMATION FOR 
<4 SAYS INFORMATION IS PRESENT 
ze} 001740 070717 DHS2 7PC TEST NO. ADDRESS CONT 
ss 001742 072130 DTS2 7 SERRPC,$TSTNM,BAE , $REGO 
965 001744 072410 DF52 
966 
967 ZITEM = =53 
968 001746 060212 EMS3 ;RHCS1 
969 001750 000000 0 
970 001752 0009000 0 
971 001754 0 
972 
973 7 ITEM 54 
974 001756 060220 EMS4 RHWC 
975 001760 000000 0 
976 001762 000000 0 
977 001764 000000 0 
978 
979 7ITEM = =655 
980 001766 060225 EMSS 7 RHBA 
981 001770 000000 
001772 000000 0 
983 001774 000000 0 
984 
985 ;ITEM 56 
986 001776 060232 EMS6 sRHMR2 
987 002000 000000 0 
002002 000000 0 
989 002 0 
990 
991 sITEM) = 57 
992 002006 060240 EMS7 sRHCS2 
993 002010 000000 0 


H 2 
MASSBUS RH70 AND RH11_DIAGNOSTIC MACY11 30A(1052) pers 10:39 PAGE 21 


CZRHBF P11 26-JUL-79 10:13 ERROR POINTER TABL SEQ 0020 

995 002014 000000 0 

996 

997 zI1TEM 60 

998 002016 060246 EM60 RHST 
999 002020 000000 0 

1000 002022 000000 0 

1001 002024 000000 0 

1002 
1003 Z ITEM 61 

10046 002026 060253 EM61 ;RHER 
1005 002030 000000 0 

1006 002032 000000 0 

1007 000000 0 
1008 
1009 sITEM 62 

1010 002036 06026C EM62 RHAS 
1011 002040 000000 0 

1012 002042 000000 0 
1013 002044 000000 0 

1014 
1015 sITEM = 63 

1016 002046 060265 EM63 ;RHTDB 
1017 002050 000000 0 

1018 002052 000000 0 
1019 002054 000000 0 

1020 
1021 ;ITEM 64 

1022 002056 060273 EM64 ;RHDB 
1023 002060 000000 v 

1024 002062 000000 0 

1025 002 000000 0 
1026 

1027 sITEM 865 

1028 002066 060300 EM65 ;RHMR1 
1029 002070 000000 0 

1030 002072 000000 0 

1031 002074 0 

1032 
1033 sITEM 66 

1034 002076 060306 EM66 ;RHDT 
1035 2100 006000 

1036 002102 0 
1037 002104 0 

1038 
1039 ITEM) 67 

1040 002106 060313 EM67  RHBAE 
1041 002110 000000 0 
1042 002112 000000 0 

1043 002114 000000 0 

1044 
1045 Z ITEM 70 

1046 002116 060321 EM70 RHCS3 
1047 002120 900000 0 

1048 002122 000000 0 

044 002124 000000 0 


MASSBUS RH70 AND RH11_DIAGNOSTIC 


CZRHBF .P11 


1096 


nd ced eh cach enh ca ee cd ce ces 
33S 


— SS es oo oS oS 
RARALVLS 


002126 


002130 
002132 
002134 


002136 


002140 
002142 
002144 


002146 
002150 
002152 
002154 


002156 


26-JUL-79 


060327 


071713 
072336 
072442 


060416 


071075 
072144 
072415 


060453 


071075 
072144 
072415 
060502 


071075 
072144 
072415 


060530 


071075 
072144 
072415 


072420 
060665 
067636 
072004 
072350 


10:13 


MACY11 30A(1052) 
ERROR POINTER TABLE 


s ITEM 


: ITEM 


7 ITEM 


: ITEM 


: ITEM 


7 ITEM 


7 ITEM 


71 
EM71 
DH172 
DT172 
DF172 
72 
EM72 
DH72 
DT71 
DF71 
73 
—EM73 
DH72 


DT71 
DF71 


, 
10:39 PAGE 22 


Ae et NO DOES NOT EQUAL 
A 7 IN RHMR2 AFTER A CLEAR 


;RHCS1 HAS AN ERROR BIT 
SET AFTER CLEAR OPERATION 


:PC TEST NO. CONTENTS OF REGISTER 


ERROR BIT SET IN RHCS2 
zsAFTER A CLEAR OPERATION 


ERROR BIT SET IN RHER, 
; TESTER ERROR REGISTER,AFTER 
z:A CLEAR OPERATION 


ERROR BIT SET IN RHST 
sAFTER A CLEAR OPERATION 


:RHBA INCREMENTED BUT DID NOT CARRY 
;OVER TO THE RHBAE REGISTER 


READY DID NOT SET AND RHwC 
:DID NOT INCREMENTM DOING A WRITE OPERATION 


SEQ 0021 


J 2 
MASSBUS RH70 AND RH11_DIAGNOSTIC MACY11 30A(1052)_ 26-JUL=79 10:39 PAGE 23 


CZRHBF .P11 26-JUL-79 10:13 ERROR POINTER TABLE SEQ 0022 
1107 :I1TEM 100 
1108 002216 060777 —M100 ;RHBA DID NOT CLEAR AFTER CLR 
1109 z;WAS LOADED INTO RHCS2 
1110 002220 067756 DH2 
1111 002222 072016 DT2 
1112 002224 072354 DF2 
1113 :ITEM = = =101 
1114 002226 061064 —M1(C1 
1115 002230 067756 DH2 
1116 002232 072016 DT2 
1117 002234 072354 DF2 
1118 sITEM 102 
1119 002236 061131 EM102 sREADY DID NOT SET IN RHCS1 
1120 002240 000000 0 
1121 002242 000000 0 
1122 002244 000000 
1123 sITEM = §=103 
1124 002246 061162 EM103 ;DOING A WRITE OPERATION RDY 
1125 7;DID NOT SET AND WC DID NOT INCREMENT 
1126 ;BUT INFO WAS WRITTEN TO TESTER 
1127 002250 067636 DH1 
1128 002252 072004 DT1 
1129 002254 072350 DF1 
1130 7 ITEM 104 
1131 002256 061340 EM104 sDOING A WRITE OPERATION RDY 
1132 DID NOT SET AND WC WAS NOT INCREMENTED 
1133 ;AND INFO WAS NOT WRITTEN TO TESTER 
11% 7 (WRITE OPERATION DID NOT WORK) 
1135 000000 0 
1136 002262 000000 0 
1137 002264 000000 0 
1138 ;ITEM~ 105 
1139 002266 061531 EM105 ;RHBAE IS MESSED UP IT SHOULD 
1140 sEQUAL 40,IT DOES NOT = 37(OLD) 
1141 zAND IT DOES NOT = 0 
1142 002270 071222 DH105 
1143 002272 072166 DT105 
1144 002274 072424 DF 105 
1145 sITEM 106 
1146 002276 061576 EM106 ;RHBAE DID NOT GET INCREMENTED 
1147 002300 071222 DH105 
1148 002302 072166 DT105 
1149 002304 072424 DF105 
1150 sITEM §=107 
1151 002306 061624 —EM107 ;READ REV. OPERATIONS DID NOT 
1152 002310 000000 0 ;READ FROM TESTER TO STORAGE LOCATION 
1153 002312 000000 0 ; (RBUS) 
1154 002314 000000 0 
1155 sITEM = 110 
1156 002316 061733 —EM110 ;RHBAE = 0 IT SHOULD = 40 
1157 SAF TER A ONE WORD WRITE 
1158 002320 000000 0 
1159 002322 000000 0 
1160 002324 000000 0 
1161 sITEM = 111 
1162 002326 062025 —M111 3;A17 DID NOT SET AFTER BA WAS INCREMENTED 


K 2 
SBUS RH70 AND RH11_DIAGNOSTIC MACY11 es pase 10:39 PAGE 24 
CORMBF P11 26-JUL-79 19:13 ERROR POINTER T SEQ 0023 


-_ 
— 
on 
W 


m 
= 


BA DID NOT INCREMENT 


072424 


062125 ° :RHBA INCREMENTED BUT IT DID 
[NOT CARRY TO A16 + Al7 IN RHCS1 
971267 


72202 
072424 


062222 


o°Cg 
~~ T 


m— 
=z 


;OUTPUT READY WAS NOT NEGATED 
zAFTER CLR WAS LOADED INTO RHCS2 


ze 
NN 


;ALL BITS DID NOT READ TO STORAGE 
LOCATION (RBUF) DURING A READ REV. OPERATION 


FLAVLSISVSAARANASSELETF 


3a 


:MDPE DID NOT SET IN RHCS2 


‘4, 


BELRSLALLSSELR 
2O00T=Sc00m—000 


INFO DID NOT WITE TO TESTER 
:DOING A WRITE REV. OPERATION 

071601 

072304 

072420 of 

062562 TRE AND SC DO NOT SEEM TO HAVE 
:BEEN SET BY MDPE 

070444 


072066 
072374 


me me ek ee mek ke a ng ak ad ad at = 2 a 2 st SS SS SS Ls 2 SF SS SS SS SS SS 


TRE IS ONLY BIT SET ,MDPE AND 
:SC SHOULD ALSO BE SET 


Seseorases 


:SC NOT SET AFTER MDPE AND TRE SET 


072420 


; 1 
062740 TRE AND SC WERE SET EITHER BY 
3AN ERROR OTHER THAN PGE,OR PGE 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


NoMPoNneNononofofory 
3 
CONAUSWN—o 





L 
MASSBUS RH70 AND RH11_DIAGNOSTIC MACY11 30A(1052) 26=JUL-79 16:39 PAGE 25 
CZRHBF .P11 26-JUL=79 10:13 : ERROR POINTER TABLE SEQ 0024 


1219 HAS AN OPEN GOING TO THE BUS 
ise 


ronononon) 
m—cooo 
x 158) 
=~ 
NM 
= 


Norsovre 


3 NOT SET AFTER A 4 WORD WRITE 
7FROM AN EV 


EN ADDRESS 


mn rmrorr 
NARN 
@ 
m-OOooO 
x 4,8) 
wi 


DBL SET AFTER DOING A 1 WORD WRITE 
FROM AN EVEN ADDRESS 


SSS 


m-0COoO 
x 4,8) 
oO 


;DBL_SET ON A 3 WORD WRITE 
FROM AN EVEN ADDRESS 


BIKAKRAN 


ae a cc a a ae ca cae ed ed cd ee ed ed ee eed eed eed 
Moronronnrrornrnnrwn 


MMM 
fawW 
Ov 


;DBL_DID NOT SET AFTER A 2 WORD 
:WRITE FROM AN EVEN ADDRESS 


:MCPE SET BUT SC READS AS CLEARED 
z:MCPE DID NOT SET 


WCE LO (EW) DID NOT SET IN RHCS3 


072431 


133 
063531 WCE HI (OW) SET ALONG WITH 
WCE LO IN RHCS3 
071420 


072240 
072431 


063632 WCE LO IS SET _IN RHCS3 BUT 
WCE IS NOT SET IN RHCS2 
071420 


072240 
072431 


NON 
SESFERSRTS 
NN ISSE SSSR 


= 
& 





MASSBUS RH70 AND RH11_DIAGNOSTIC MACY11 30A(1052) oat 10:39 PAGE 26 


CZRHBF P11 26-JUL-79 10:13 ERROR POINTER TABL SEQ 0025 


zWCE HI DID NOT SET IN RHCS3 


y 
o 


WCE HI SET BUT WCE DID NOT SET IN RHCS2 


072431 


064030 E ;WCE LO SET WITH WCE HI IN RHCS3 
071420 
072240 
072431 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


BESPARARIS ao S 








N 
MASSBUS _RH70 AND RH11_DIA TIC MACY11 30A(1052) 26-JUL=79 10:39 PAGE 27 
CZRHBF .P11 26-JUL-79 10:1 ERROR POINTER TABLE 


064131 EM140 WRITE OPERATION DID NOT INC WC 
000000 . 


000000 
;BA WAS NOT INC AFTER A WRITE 


SSBBVRIRBVS 


: INFO WAS NOT WRITTEN TO TESTER 


READ OPERATION DID NOT INC WC 


SESSSRES 


;BA WAS NOT INC AFTER A READ 


WWAWAG 
at ad od od ed 


064476 ; INFO DID NOT READ FROM TESTER 
071476 
072256 
072420 


WONAULSWN—o 


Bey 


:THIS IS FOR PRINTED CONTENTS 
OF THE RH REGISTERS 


ALL BITS DID NOT GET TRANSFERED 
zDURING A READ OPERATION 


RESSENES 


BeISsEs 


READ OPERATION DID NOT SEEM TO WORK 


WIAA 
EAE 


ALL BITS DID NOT WRITE TO TESTER 


Ww 
we 


ARWN2ODS 


072304 

072420 1a 

065141 WRITE OPERATION DID NOT WRITE 
:TO TESTER © 

071601 

072304 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


RERERE 





MASSBUS RH70 AND RH11_DIAGNOSTIC MACY11 30A(1052) 
CZRHBF P11 26-JUL-79 10:13 ERROR POINTER TABL 


072420 DF 76 
sITEM =153 
065211 —EM153 ;DBL SET ON A 2 WORD TRANSFER 
sWITH BAI SET 


8 
26-JUL=79 10:39 PAGE 28 
E SEQ 0027 


EERE 
UFWN—OOOn 
m 
z 
—s 
w 
s 


;DBL_SET ON A_1 WORD READ FROM 
7AN EVEN ADDRESS 


MMVIII 


WWANIAAMA AANA 
WVivi 
WAP ABAD. 4 

m—-OOoOom 

zu 

_—UW 

Ww 

Ww 


;DBL SET ON A 2 WORD WRITE REV 
:WITH BAI SET 


m—-coOo 
x 2°.) 

=O 

w 

Oo 


;DBL_ SET ON A 2 WORD WRITE FROM 
FROM AN ODD ADDRESS 


SESESASES 


Oo 
m—OO0OoO 
zu 
—N 
wn 
N 


;DBL_DID NOT SET ON A 2 WORD 
WRITE REV FROM AN EVEN ADDRESS 


ERR R ES 
BVRIRIN=3 
m—-ooo 

x To.) 

-—o 

a 

oO 


;DBL SET ON A 2 WORD WRITE REV 
FROM AN ODD ADDRESS 


m-OoOooO 
on 
— 


;DBL SET ON A 3 WORD WRITE REV 
FROM AN ODD ADDRESS 


;DBL DID NOT SET ON A 2 WORD 


SSSSSESRES SES 


00 
Wh 
Coe mm" as 
~N 


oO 
uw 
x fo. 
wW 


;DBL_ SET ON A 2 WORD READ 
FROM AN ODD ADDRESS 


WAWWAAAAW 
SLRAR 


S38 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


nS 
So 
— 
m— 


;DBL SET ON A 2 WORD READ REV 





_ 
MASSBUS _RH70 AND RH11_DIAGNOSTIC MACY11 arate toe 26-JUL=79 10:39 PAGE 29 
CZRHBF .P11 26-JUL-79 10:13 ERROR POINTER TABLE SEQ 0028 


FROM AN ODD ADDRESS 


m—-O0OoO 
Bo 
Ww 


;DBL_DID NOT SET ON A 2 WORD 
[READ REV FROM AN EVEN ADDRESS 


ace 
—oO 

oa 

Oo 


;DBL_SET ON A 3 WORD READ FROM 
:AN EVEN ADDRESS 


ooo 


mni— 
N 


;DBL_DID NOT SET ON A 3 WORD 
READ REV FROM AN EVEN ADDRESS 


072437 F 
066527 2 ;TRE READS AS SET.PGE AND SC 


sREAD AS CLEARED.PGE AND SC 
; SHOULD ALSO BE SET 


m=-CcO0oO 
3N 

—N 

N 

N 


PGE AND TRE READ AS SET SC 
READS AS CLEARED 


m-OScO 
=n 

Ww 

N 

WwW 


READY DID NOT CAUSE AN INTRUPT 
;WITH IE SET IN RHCS1 


3sN 
— 
~N 
SS 


71E& WILL NOT SET IN RHCS1 


x Se) 
WN 
N 
Ww 


:1E HAS AN OPEN GOING TO THE BUS 


ooom—-ooom-ocoo 
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CZRHBF.P11  26-JUL=79 10:13 ERROR POINTER TABLE SEQ 0029 
1458 ITEM 176 

1459 003176 066777 EM176 ;TRE IS SET DLT AND SC SHOULD ALSO BE SET 
1460 003200 071334 DH121 

1461 003202 072216 DT121 

1462 003204 072420 DF 76 

1463 s1TEM 177 

1464 003206 067032 EM177 ;DLT AND TRE ARE SET ,SC READS AS CLEARED 
1465 003219 071334 DH121 

1466 003212 072216 DT121 

1467 14 072420 DF 76 

1468 :1TEM = 200 

1469 003216 067077 EM200 ;HIBITE LOBYTE GATE FOR WC NG 
1470 003220 070673 DH4 1 

1471 22 072122 DT41 

1472 003224 072406 DF41 

1473 S1TEM = 201 

1474 003226 067161 EM201 ;HIBYTE LOBYTE GATE FOR DB NG 
1475 003230 070673 DH41 

1476 32 072122 DT41 

1477 003234 072406 DF41 

1478 ITEM 202 

1479 003236 067243 EM202 ;HIBYTE LOBYTE GATE FOR BA IS NG 
1480 003240 070673 DH4 1 

1481 003242 072122 DT41 

1482 003244 072406 DF41 

1483 ITEM 203 . 

1484 003246 067325 EM203 ;RHBA HAS WRONG- ADDRESS 

1485 003250 070673 DH41 

486 003252 072122 D141 

1487 54 072406 DF41 

1488 ITEM 204 

1489 003256 067405 EM204 ; TESTER DATA BUFFER HAS WRONG INFO 
1490 003260 070673 DH41 

1491 003262 072122 DT41 

1492 64 072406 DF41 

1493 7ITEM = =205 

1494 003266 067472 EM205 :RH DID NOT INTERUPT 

1495 70 070673 DH4 1 

1496 003272 072122 DT41 

1497 003274 072406 DF41 

1498 ITEM 206 

1499 003276 067556 EM206 :RHWC SHOULD BE ZERO 

1500 003300 070673 DHS 1 

1501 003302 072122 DT41 

1502 003 72406 DF41 

1503 ITEM = 207 

1504 003306 067602 EM207 ; TRANSFER WAS DONE ON PORT B 
1505 003310 000000 | 0 

1506 003312 000000 0 

1507 003314 000000 0 

1508 7RH REGISTERS 

1509 

Hf 

1512 003316 000774 RHVEC :774 :RH VECTOR ADDRESS 

1513 CAAA AAR RA ERE RARER ARERR ERE REERRAAEARARERARRARE REE 


MASSBUS RH70 
CZRHBF P11 


_s 
wi 
_— 
LS 


MNMNVNNNMNNN ee 


PAPI IIIS II eee ee 
SBNVRAKRANLSBSO NOAUESWN—OODONOAW 


VY 
SLRS 
SWN-o 


wal 
Vv 
o 


kk kk ak ak ks tk a a a a a oh ho 2 a 3 
MAA AIT 
wi 
Ww 


AND RH11 DIAGNOSTIC 
26-JUL-79 10:13 
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ERROR POINTER TABLE SEQ 0030 
;WORD COUNT REGISTER (RHWC) 
;EACH BIT IS CALLED BY BIT NUMBER 
BUS ADDRESS REGISTER (RHBA) 
;EACH BIT IS CALLED BY BIT NUMBER 
CONTROL AND STATUS REGISTER 2 (RHCS2) 
US1= 1 UNIT SELECT (BIT #0) 
US2= 2 ;UNIT SELECT (BIT #1) 
US4= 4 ;UNIT SELECT (BIT #2) 
BAI= 10 7BUS ADDRESS INCREMENT INHIBIT (BIT #3) 
PAT= 20 : INVERT PARITY CHECK FOR MCPE 
CLR= 40 ZCLEAR (BIT #5) 
IR= 100 ; INPUT READY (BIT #6) 
= 200 ; OUTPUT oy (BIT #7) 
MPE= 400 MASS BUS PARITY ERROR (BIT #8) 
MXF = 1000 s:MISSED TRANSFER ERROR (BIT #9) 
PGE= 2000 3PR ERROR (81 
NEM= 000 ; NON ST. Y T #11) 
NED= 10000 NON EXISTANT DRIVE (BIT #12) 
UPE= 20000 ;UNIBUS PARITY ERROR (BIT #13) 
WCE= 40000 sWRITE CHECK ERROR (BIT #14) 
DLT= 100000 :DATA LATE (BIT #15) 
CONTROL AND STATUS REGISTER 3 (RHCS3) 
IPCKO= 1 : INVERT PARITY,.ON LOW BYTE OF EVEN WORD (BIT #0) 
IPCK1= 2 : INVERT PARITY.ON HI BYTE OF EVEN WORD (BIT #1) 
IPCK2= 4 INVERT PARITY,ON LOW BYTE OF ODD WORD(BIT #2) 
IPCK3= 10 Z INVERT PARITY,ON HI wy OF ODD WORD(BIT #3) 
IE3= 100 ZINTERUPT ENABLE ,SAME AS BIT 6 OF RHCS1 (BIT #6) 
DBL= 2000 [DOUBLE WORD OPERATION,SET WHEN LAST MEMORY TRANSFER WAS 
WCELO= 4000 [WRITE CHECK ERROR EVEN WORD (BIT #11) 
WCEHI= 10000 [WRITE CHECK ERROR ODD WORD (BIT #12) 
DPELO= 20000 [DATA PARITY ERROR EVEN WORD (BIT #13) 
DPEHI= 40000 ;DATA PARITY ERROR ODD WORD (BIT #14) 
APE= 100000 ADDRESS PARITY ERROR (BIT #15) 


DATA BUFFER REGISTER (RHDB) 
EACH BIT IS CALLED BY BIT NUMBER 


CONTROL AND STATUS 1 REGISTER. (#00) . 
GO= 1 3:GO (BIT #0) 

IE= 100 : INTERRUPT ENABLE (BIT #6) 

RDY= 200 :READY (BIT #7) 

A16= 400 [HIGH ORDER UNIBUS BITS (BIT #8) 


Al7= 1000 ;HIGH ORDER UNIBUS BITS (BIT #9) 


Pom 
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CZRHBF P11 26-JUL=79 10:13 ERROR POINTER TABLE SEQ 0031 
1570 002000 PSEL= 2000 ;PORT SELECT (BIT #10) 
1571 004000 DVA= 4000 DEVICE AVAILABLE (BIT #11) 
1572 020000 MCPE= 20000 ;MASSBUSS PARITY ERROR (BIT #13) 
1573 040000 TRE= 40000 ; TRANSFER ERROR (BIT #14) 
1574 000100 TREB= 100 ;TRE BIT FOR A BYTE OPERATION 
132? 100000 SC= 100000 [SPECIAL CONDITION (BIT #15) 
iF 44 STATUS REGISTER (RHST) (#01) 
1579 000200 DRY= 200 DRIVE READY (BIT #7) 
1580 000400 DPR= 400 :DRIVE PRESENT (BIT #8) 
1581 010000 MOL = 10000 ;MEDIUM ON-LINE (BIT #12) 
1582 020000 PIP= 20000 z:POSITIONING OPERATION 1e PROGRESS (BIT #13) 
1583 040000 ERR= 40000 ;COMPOSIT ERROR. (BIT #14 
1 100000 ATA= 100000 sATTENTION ACTIVE (BIT #5) 
1586 ERROR REGISTER #01 (RHER) (402) 
1587 000001 ILF= 1 ; ILLEGAL_FUNCTION (BIT 40) 
1588 000004 = 4 :REGISTER MODIFICATION REFUSED (BIT #2) 
1589 000010 CPE= 10 :CONTROL PARITY ERROR(BIT #3) 
1590 000020 DPE= 20 :DATA PARITY ERROR(BIT #4) 
1591 000040 RMBEX= 40 Aegon EXCEPTION ,WHEN SET CAUSES AN ABORT OF A DATA T 
1592 000100 RFAIL= 100 MASSBUS POWER FAIL(BIT #6) 
1593 010000 DTE= 10000 “DRIVE TIMING ERROR (BIT 412) 
Up be 020000 OP I= 20000 OPERATION INCOMPLETE (BIT #13) 





G 3 
MASSBUS RH70 AND RH11_DIAGNOSTIC MACY11 30A(1052) 26-JUL=79 10:39 PAGE 33 


CZRHBF P11 26-JUL=79 10:13 ERROR POINTER TABLE SEQ 0032 
1338 ;DIAGNOSTIC REGISTER (RHMR1) (#03) 
1598 000901 DMD= 1 ;DIAGINOSTIC MODE (BIT #0) 
1599 000002 MCLK= 2 sMAINTAINCE CLOCK (BIT #1) 
1600 000004 FERR= 4 sFORCE ERROR (BIT #2) 
1601 000010 ICPA= 10 : INVERT CONTROL PARITY,CAUSES PARITY TO BE EVEN WHEN SET 
1602 000020 IDPA= 20 : INVERT DATA PARITY,CAUSES DATA PARITY TOBE EVEN WHEN SE 
1603 000040 DPCA= 40 pei y PARITY CHECK, INHIBITS PARITY CHECK Fine BOTH C AN 
1604 000100 NEBL= 100 NO END OF BLOCK, INHIBITS TESTER FROM GENERA ~My A ry 
1605 000200 DTRM= 200 ZWHEN SET DELAYS TRA FROM BEING ASSERTED FOR "SOON “< 
1606 000400 DOcCC= 400 ISSABLE OCCUPY (BIT #8) 
1607 001000 SLKM= 1000 ‘Syne CLOCK MINIMUM WIDTH ,WHEN SET CHANGES SYNC CLOCK T 
1608 002000 ISLK= 2000 ZINVERT SYNC CLOCK,WHEN SET INVERTS wy CLOCK,NO EFFECT 
1609 004000 ENPS= 4000 ; ENABL LE PATTERN SHIFT,WHEN SET CAUSES A 16 OR 18 BIT ROT 
be ot 010000 BMD18= 10000 318 BIT MODE (BIT #125 
ht zATTENTION SUMMARY PSEUDO-REGISTER (RHAS) (#04) 
1614 000001 ATO= 1 DEVICE O (BIT #0) 
1615 000002 AT1= 2 [DEVICE 1 (BIT #1) 
1616 000004 AT2= 4 sDEVICE 2 (BIT #2) 
1617 000010 AT3= 10 DEVICE 3 (BIT #3) 
1618 000020 AT4= 20 DEVICE 4 (BIT #4) 
1619 000040 AT5= 49 DEVICE 5 (BIT #5) 
1620 000100 AT6= 100 DEVICE 6 (BIT #6) 
125) 000200 AT7= 200 DEVICE 7 (BIT #7) 
soe? TRANSFER CONTROL REGISTER (45) 
1625 000001 DNO= 1 DRIVE NUBER BIT #0 (BIT #0) 
1626 000002 DN1= 2 :DRIVE NUMBER BIT #1 (BIT #1) 
1627 DN2= 4 DRIVE NUMBER BIT #2 (BIT #2) 
1628 000010 SCLK= 10 SYNC CLOCK RANGE BIT ,WHEN CLEAR SYNC CLOCK IS 0.4-2.6 
1 [WHEN SET 2.0-10.6 MICRO SECONDS (BIT #3) 
6 000020 = 20 : IZE BIT,SETS GAP SIZE TO 5 MICRUSECONDS WHEN CLEAR 
1631 000040 BLO= 40 ;BLOCK SIZE BIT O (BIT #5) 
1632 000100 Bi l= 100 BLOCK SIZE BIT 1(BIT #6) 
tar 000200 BL2= 200 K SIZE BIT 2(BIT #7) 
aH 3RH70 1/0 REGISTERS LOCATED IN RH 
1637 003320 160100 ADD1: 160100 :BASE ADDRESS RH 41 
1638 003322 160200 ADD2: 160200 ;BASE ADDRESS RH #2 
1639 003324 160300 ADD3: 160300 ;BASE ADDRESS RH #3 
1640 003326 160400 ADD4: 160400. ;BASE ADDRESS RH #4 
1641 003330 000000 RHCS1: 0 ;CONTROL AND STATUS 1 
1642 003332 000000 RHWC 0 WORD COUNT 
1643 003334 000000 R 0 7BUS ADDRESS 
1644 003336 000000 RHMR2: 0 or crn ee 
1645 003340 000000 RHCS2: 0 ONTROL AND STATUS 2 
1 003342 000000 RHST 0 : TESTER STATUS 
1647 003344 000000 RHER 0 ; ERROR REGISTER 
1648 000000 RHAS 0 ATTENTION SUMMARY REG 
9 3350 000000 RHTDB: 0 :TESTER DATA REGISTER 
1650 003352 000000 RHDB: 0 DATA BUFFER 
1651 003354 000000 RHMR1: 0 [DIAGNOSTIC (MAINTENCE) REGISTER 
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052525 
125252 
000000 


000001 
000002 


000001 


10:13 
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RHDT: 0 ;DRIVE TYPE REGISTER 
RHBAE: 0 -BUS ADDRESS EXTENTION 
RHCS3: 0 ;CONTROL AND STATUS 3 
RHCS1B: 0 ;HIGH BYTE OF RHCS1 REG. 
DEVIC1: 0 zADDRESS OF RH #1 
DEVIC2: 0 sADDRESS OF RH #2 
DEVIC3: O sADDRESS OF RH #3 
DEVIC4: 0 zADDRESS OF RH #4 
DEVCNT: O ;DEVICE COUNTER 

~ DEVICS: 0 USED TO CONSTRUCT REG. ADDRESSES 
;OFF11 WILL BE USED AS A CALCULATION LOCATION 
OFF11: O :REG. CALCULATION LOCATION 
LERADD= 177740 ;LOW ERROR ADDRESS REG. 
HERADD= 177742 HIGH ERROR ADDRESS REG 
MEMERR= 177744 ;MEMORY SYSTEM ERROR REG 
REGEND: 0 ;REGISTER ENDING ADDRESS 
VECADD: 0 VECTOR ADDRESS 
RETAIN: 0 


SLEEK EEK EEE EEEEEREKEEEKEKREEKEEEEEEKEEEEEEEEREREEEEEKEE EK 


sREGISTER STORAGE ADDRESSES 


DLA REKEERREEREREREKEEKEREE KKK 


AS: 0 ATTENTION SUMMARY 
BA: 0 BUS ADDRESS 

BAE : 0 ;BUS ADDRESS EXTENTION 
CS1: 0 CONTROL AND STATUS 1 
CS2: 0 :CONTROL AND STATUS 2 
CS3: 0 CONTROL AND STATUS 3 
DB: 0 DATA BUFFER 

DR: 0 :DIAGNOSTIC REGISTER 
DS1: 0 iii a STATUS 

DT: 0 :DRIVE TYPE 

ER1: C ;ERROR REGISTER 

TC: 0 ; TRANSFER CONTROL 
TDR: 0 STESTER DATA REGISTER 
WC: 0 WORD COUNT 


DLR ERKEEE EKER KEE 


:BITS AND BIT PATTERNS 


DDR EEEKEEEKEERERKEKEEKEREEEEKEEEREREREREREKEKEE 


= 52525 ;ALTERNATE BIT PATTERN 
= 125252 [OPPOSITE AL ALTERNATE BIT PATTERN 
ZERO= 0O ; CONSTANT ZERO 
ONE= 1 : CONSTANT 1 
= ; CONSTANT 2 


LEAR EERRE EEE 


FUNCTION CODES 


DLR REAR E EERE EEE ERE KEE EERE EKEE RE 


NOOP= 01 :NO OPERATION,RESETS GO BIT 


SEQ 0033 


MASSBUS RH70 AND RH11 pee tC 


CZRHBF P11 


_ 


i > PD | 
WOONAUSWN—O 


NNNNNNNNWNG 
Mrmnnrnrronor 
OO NARUR WO 


83s 


NANANANANANANN 
SSSSRAKASS 


ce cet cea a ed cae ceed ced cc ce el el ce ec cl ce a cal ed ee cad a ce ee cd ce ce cl ed 
N 
S 


N 
S 
_ 
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FF REAR ARAA AAR ARARERAEEEREEEAREREREERAAERAAREERRRERERHE EH 


WRCHO= 51 :THESE WRCH BITS ARE WRITE/CHECK 
WRCHI= 52 SCODES ,IF THE CODE IS AN ODD 
WRCH2= 53 [NUMBER THE GO BIT IS INCLUDED 
WRCH3= 54 TIF THEY ARE EVEN GO BIT IS NOT INCLUDED 
WRCHG= 55 

WRCHS= 56 

WRCH6= 57 

FF RARER ERE REE REE ERE 
READO= 71 ;READ CODES 

READI= 72 SIF THE CODE IS AN ODD NUMBER 
READ2= 73 STHE GO BIT IS INCLUDED 

READ3= 74 

READ4= 75 

READS= 76 

READ6= 77 


FF EAA ERR EERE EERE EERE EEE 


WRITEO= 61 WRITE CODES 
WRITE1= 62 :1F THE CODE IS AN ODD NUMBER 


WRITE2= 63 THE GO BIT IS INCLUDED 
WRITE3= 64 IF IT_1S EVEN THE GO BIT 
WRITES= 65 :I1S NOT INCLUDED 

WRITES= 66 

WRITE6= 67 


2 FREER REE EEKEKEEEKEERREEEEKEKREEEEEEKEKEEEKERKKKK 


DRCLR= 11 CLEARS ALL ERROR BITS IN THE DRIVE 
AND SETS THE DRIVE READY BIT 


J LARK EEE EEK KEEKEKEREEEEKEKEEEREREEREKEKEEEKEKEEKEEEKEKEEK 


SEARCH= 31 SETS A_ONE SHOT WHICH SETS 
zATA AFTER 100USEC + OR MINUS 20% 


fF RARER EKER REE 


;WATBIT STORAGE LOCATIONS 


DBAS ISI ISIS ISIC ISISIOIIISIOIOIOIOIISIOIIOIIOIOIIOIIIOIUIOIUIOIOIIIOIIOIIO IOI IOI III OK 
BITCNT: 0 ;BIT COUNTER 

LOOCNT: 0 :LOOP CPUNT 

PASS: 0 PASS COUNT FOR THE LARGE TRANSFER TEST 


CDRS ISIS ISISIISIIIOIIIOIDIDISIOIIOIOIOIOIOIOIOIOIUIOIOIOIOIOIOIOIIOIOI TOTO TOTO TOTTI OT TIE 
;THIS IS WHERE THE TEST NUMBER IS STORED JUST 
SREFGRE U7 13 PRICED GA wccecccensvccesseess 


CLARA REE EKEREKERREEKEEEKEKEKKEKEEKEEEKEREKEKEEKEEKEREREREEREKEEKEEEKKEKKKEKEE 


TSTNM: 0 TEST NO. STORAGE 
OFFSET: 0 OFFSET FOR ERROR HEADER 
HEDDAD: 0 ;USE TO FIND HEADER ERROR MESSAGE 


J LEAR EAE EEEEEEREKREEEREEEEREREREEEEEEREEKEKKEKEKEE 


THESE ARE THE READ WRITE BUFFERS 


DUAR 


SEQ 0034 
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sEVEN ADDRESS 
ODD ADDRESS 


COoooooo oo 


So 


WE SARASAASAASALALAALALALASLALALE LES ESESSL ELAR SEER RRR S RASS EES SAE ESS 


F THESE ARE FOR THE CLEARS TEST 


5 FARRER ERE RERERREREEEEEREERERREREEKEE EH 


177777 
000000 


ee ee —. 
NOSENSAR VS 


004 
004 
004 
004 
004 
004 
004 
004 
004 
004 
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1792 5 FEAR AERA REREREEREEEEEREERERRREEREERREEREEEEKE EE 


BEGIN: ;GET SKIP FLAG READY 
C R SET SKIP FLAG 
;GO_ TO START 


BR ; 
BEGINS: RO ;GET SKIP FLAG READY 
C ;CLR ALTERNATE START FLAG 
SET FOR ALTERNATE START 
T foty 


BR 
BEGIN2: ‘eet RO READ 
C :TO BE COMPLIMEN TED 
ZENTER DIAG. FOR NEXT -PASS 


SNASRSENSER 


“N 
o 


BYZIZIZI 
S88883388338 


z 


8 


JMP a4TST1 
BEGIN1: #74 , @AREGEND 
MO’ #774 ,@AVECADD 
RO ;CLEAR THE SKIP FLAG 


J FARRAR EEEKEKEEKEEKEEKEREEEEEEEREEREKEEKEKEERERERR EEE 


Seek oraR 
3 


START: 
~SBTTL_ INITIALIZE THE COMMON TAGS 
3;CLEAR THE COMMON TAGS (SCMTAG) AREA 
MOV #SCMTAG,R6 2 sFIRST LOCATION TO BE CLEARED 
CLR (R6) + :sCLEAR MEMORY LOCATION 
CMP WSWR,R6 ;;DONE? © 
a4 ;;LOOP BACK 


IF NO 
WSTACK, SP 2sSETUP THE STACK POINTER 
: INITIALIZE A FEW VECTORS 
#SSCOPE , @#IOTVEC Ate VECTOR FOR SCOPE ROUTINE 
#340, a#IOTVEC+2 ;:LEVEL 
WSE , @MEMTVEC :emt VECTOR FOR ERROR ROUTINE 
ood awEMTVEC+2 sel VEL 7 
WSTRAP ,Q#TRAPVEC :; THA VECTOR FOR TRAP CALLS 
#340, aFTRAPVEC +2: LEVE 
2 @APWRVEC : POWER FAILURE VECTOR 
#340, a#PWRVEC+2 ;:LEVEL 7 aie 
STIMES if TNITIALIZe NUMBER OF ITERATIONS 
SESCAPE 22 CLEAR THE ESCAPE ON —_ ADDRESS 
#1, SERMAX OW ONE ERROR PER T 
#..SLPADR INITIALIZE THE LOOP ADDRESS FOR SCOPE 
MOV #. ,SLPERR SETUP THE ERROR LOOP ADDRESS 
SIZE FOR A HARDUARE SWITCH REGISTER. IF NOT FOUND OR IT IS 
7;EQUAL TO A *~1'", SETUP FOR A SOFTWARE SWITCH REGISTER. 
MOV @FERRVEC, nCSP) SOE SAVE ERROR VEC J 
004406 #64$,aNERRVEC :SET UP ERROR VECTOR 
177570 #DSWR, SWR hay FOR A HARDWARE SWICH REGISTER 
177570 #DDISP,DISPLAY ;;AND A HARDWARE DISPLAY REGISTER 
177777 #-1,@SWR ee TRY TO REFERENCE HARDWARE SWR 
BNE 66$ CH IF NO TIMEOUT TRAP OCCURRED 
HARDWARE SWR IS NOT = -1 


0 00 00 00 Cd Co Co Co Co CO 
ad ed ed cd aad eed on aed ced end 
WONAULSWN—O 


SRRRSE 


SESS5 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
j 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


ae 


65$ ; 
004414 64$: MO #65$, (SP) SISET UP FOR TRAP RETURN 
000176 65$: WREG, SWR pre TO SOFTWARE SwWR 
012737 000174 *DISPREG. DISP 
012637 000004 66$: (SP)+, BRERRVEC ” | ;RESTORE ERROR VECTOR 


-SBTTL GET VALUE FOR SOFTWARE SWITCH REGISTER 
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1848 005737 000042 : ase 3cARE WE a ry UNDER XXDP/ACT? 
1849 001006 67$ ; ; ; BRANCH YES 

1850 023727 001140 000176 SWR ,ASWREG ie ; SOF TWARE SWITCH REG SELECTED? 
1851 001005 BNE 68$ F 

185 104406 Sr 32GET SOF T-SUR SETTINGS 


185 000403 68$ “ 
Hh 112737 000001 001134 +4 : #1,$AUTOB 3SET AUTO-MODE INDICATOR 
1856 004464 004737 074500 PC,STKINT 

1857 RO WAS IT A RESTART 
1858 004472 100443 BM AROUND zYES,SKIP TYPING 
1859 004502 .70$ 23 TYPE ASCIZ STRING 


1860 500 0004 BR 69$ GET OVER THE ASCIZ 
1861 ;;70$: .ASCIZ <15><12>/RH 11 AND 70 I O AND CONTROLLER DIAGNOSTIC/ 


004566 TYPE 72$ or ASCIZ STRING 
BR 1$ T OVER THE ASCIZ 
-ASCIZ €18><12>/CZRHB-D’ / 


RR 


CREEK KEERKEKKKEKEKEKEKKEKEEKEKKRKEEKEKEEKEEEKKEKERERKEEKEKEKERKEKEKEEERKEKKK 


:*TEST 1 THIS IS THE RH ADRESS DECODE TEST 
OW THE OPERATOR TO SAY 
; ON THE AND WHAT ITS BASE 
; *ADDRESS IS. THE RH IS THEN TESTED FOR A 
*RESPONSE AND CHECKED FOR A TESTER BEING 
“ #CONNECT ED. 


EIEIO IOS EISIOOIIOUIOIIOISISO ISIC IOI III IO Ont 


i811: 
#1,$TIMES 77D0 1 ITERATION 
#PARITY,@4114 
#STACK, SP 
4340,04116 
ATIEOUT, AMERRVEC 7SET UP TIMEOUT 
#340, a#ERRVEC+2 ; SETUP stad ope 
RO sSKIP TYPOUT ? 
SKIPIN *NO 


CLEAR SKIP 1s 


1 
1 
1 
1 
1 
1 
1 
: 


864 
865 
866 
867 
868 
869 
870 
1871 
1872 
1873 
1874 
1875 
1876 
1877 


90 00 00 
3a 


SEEREE 


SERRE RP REEL td 


J 
SKIPIN: : EADY 
T 71S IT AN ALTERNATE START 


[NO 
J KONG YES DO ALTERNATE SETUP 
SLEUTH: :D0 REGULAR SETUP 
KONG : if; set START FLAG 
ge tee asc? 's 


BR 64$ GET OVER THE TASCIZ 
TS <15><12>/TYPE BASE ADDRESS FOR RH / 


(SP)+,DEVIC1 GET BASE ADDRESS 
,67$ >; TYPE asciz STRING 
BR 66$ 7:GET OVER THE 7 hae 
-ASCIZ <15><12>/TYPE RH VECTOR ADDRESS / 
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CZRHBF P11 26-JUL-79 10:1 T1 S IS THE RH ADRESS DECODE TEST 


bbang 14 10641 RDOCT 
MOV (SP)+,VECADD ;GET VECTOR ADDRESS 
,69$ 23 TYPE ASCIZ STRING 


$ :GET OVER THE ASCIZ 
<15><12>/HOW MANY REGISTERS ARE YOU JUMPERED FOR / 


(SP) +,REGEND :GET “ey OF REG 
REGEND T 


GI1 :60 CREATE ADDRESSES 
ADD1 ,DEVIC1 SETUP D EVICE 1 
#AD2ERR, ERRVEC TIMEOUT 

:18 THERE A DEVICE 


ADD2 ,DEVIC2 
WAD3ERR, ERRVEC FOR TIMEOUT 
@ADD3 335 THERE A DEVICE 
ADD3 ,DEVIC3 


WADGERR, ERRVEC {FOR T TIMEOUT 
@ADD4 is THERE A DEVICE 
ADDS ,DEVIC4 


#TIEOUT, ERRVEC ‘REPLACE TIMEOUT 
RESTAR TEST DEVICES 
ZNO DEVICE 2 


DEVIC2 

rill. ogg l ERRVEC ;REPLACE TIMEOUT 
f (SP)+ CORRECT STACK 
: TEST mae 


NAD EEE te peter tit te 
REBSHENSARRR 


ROR 
SSSSSSSSSSSSSOSESOS o 


kk ak kk kk kd td td td a 
Ooo 
MNnN 


O00 
oe 
NONINIRY  § § 


WNsose 


DEVIC3 
#TIEOUT ,ERRVEC 
(SP)+,(SP)+ 
RESTAR 


DEVIC4 
#TIEOUT,ERRVEC 
(SP)+,(SP)+ 
Be THERE A MONITOR 


SEOP YES EXIT 
#160100,DEVIC1 SARE WE HERE AFTER 210 
SA200 


:NO, 
KONG :GET NEW ADDRESS FOR 210 


,65$ si ASCIZ STRING 
4$ GET OVER THE ASCIZ 
<15><12>/TYPE BASE ADDRESS FOR RH #1 / 


(SP)+,DEVIC1* SE ADDRESS FOR RH1 

SERFLG : HERE BECAUSE OF AN ADDRESS ERROR 
G01 ae READY FOR NEXT ADDRESS 
ayeet A ZERO 


JMP G1G1 
TST DEVIC1 
BNE G1GO1 
1 JMP GIG1 NEED ADDRESS 
013737 003366 : MOV DEVIC1,DEVICS GET READY TO CREATE REG. ADDRESS 


SESLGSSSSSERERLE 
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005444 012 005302 003410 #G1GO,RETAIN SAVE RETURN ADDRESS 
005452 0001 5 00620 G1G04 ZCONSTRUCT REGISTER ADDRESSES 
oneces tf 7 00004 : :IS THER A MONITOR 


ZNO 

005464 046206 EXIT 

005470 : 

005470 oo ASCIZ STRING 
000420 BR GET OVER THE ASCIZ 

<15><12>/TYPE BASE ADDRESS FOR RH #2 / 


segengaaa & 
. 


So et 


© 
3 


GET VALUE 
(SP) + ,DEVIC2 :SAVE ADDRESS 
SERFLG sARE WE HERE BECAUSE OF ERROR 


G02 

DEVIC2 31S IT 0 

Gl2 

RESTAT SET UP FOR RH #1 


DEVIC2 

G1GO 7. =NO, GET NEXT ADDRESS 
REST. CREATE ADDRESS FOR RHA#1 
DEVICe, DEVICS :GET READY TO CREATE 
; RETURN Ss 


#G1GO1 RETAIN 2 SAV ADDRES 
G1G04 CREATE REG. ADDRESSES 
ar42 21S THERE A MONITOR 
G1G3 :NO 
SEOP sEXIT 


-65$ 2a TYPE ASCIZ STRING 
$ ;GET OVER THE ASCIZ 
<15><12>/TYPE BASE ADDRESS FOR RH #3 / 


DODOOG OOO 
BIIVSARAN 


wn 
oO 


005 
005 
005 
005 
005 
005 
005 
005 
005 
005 
005 
005 
00 
0056 


RRINSESRLSRO RE 


pe 


(SP) + DEVIC3 SAVE ADDRESS 
SERFLG ZARE WE HERE DO TO ERROR 


718 17 0 

7NO 

sRESTART PASS 
S IT 0 


[GET NEXT ADDRESS 
RESTAR ;CREATE RH#1 ADDRESSES 
DEVIC3,DEVICS 3 SETUP TO CREATE ADDRESS 
#G1GO2 ,RETAIN RETURN ADDRESS 

‘CREATE ADDRESSES 
ase 31S THERE A MONITOR 
oss 3NO 
$E EXIT 


,65$ ss Tyne ASCIZ STRING 
64$ sGET OVER THE ASCIZ 
<15><12>YTYPE BASE ADDRESS FOR RH #4 / 


1980 
1981 
1982 
1983 
1984 
1985 
1986 
1987 
1988 
1989 
1990 
1991 
1992 
1993 
1994 
1995 
1996 
1997 
1998 
1999 


BoERRES 


Bee 


(SP) +,DEVIC4 SAVE ADDRESS 
a = HERE BECAUSE OF ERROR 


py 
MEWN-—o 
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2016 
2017 
2018 
2019 


2020 
2021 
2022 
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012777 
012637 


003400 
003410 


000004 
175012 
175016 


174760 


000004 
174724 
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S THE RH ADRESS DECODE TEST 


3$: MOV 


TSTADD: 


1$: CMPB 


2$: TST 
ADDERR: 


RHTEST: 


MOV 
RH11B8A: 


DEVIC4 71S 17 0 

GI4 :NO 

RESTAT ;RESTART PASS 

RESTAR ;GO_ SET UP REG. ADDRESSES 

DEVIC4 .DEVICS 3GET READY TO CREATE REG. ADDRESSES 
#G1GO03,RETAIN 7STORE RETURN ADDRESS 

G1G04 7GO CREATE ADDRESSES 

DEVIC1,DEVICS 3GET READY TO Pin} REG. ADDRESSES 
#GIGO,RETAIN VE RETURN ADDRESS 

,65$ 23 TYPE asciz STRING 


64$ ;GET OVER THE ASCIZ 
<15><12>/TESTING RH #1 AT BASE ADDRESS / 


DEVIC1,-(SP) _ : SAVE DEVIC1 FOR TYPEOUT 
+:GO TYPE==OCTAL ASCII(ALL DIGITS) 

DEVICS. arorr 1 :SETUP FOR ADDRESSE 
#RHCS1 :SET UP WHERE TO PUT THEM 
ororrite (R2)+ :SETUP ADDRESS 
#TWO, OFF 11 SSETUP NEXT SORE 
#RHBAE , TARE ALL ADDRESSES SET UP 

SIS INFORMATION CORRECT? 
4$ ‘NO SETUP NEW ADDRESS 
DEVICS,a@4OFF11 
REGEND, a#OFF 11 
@4OFF 11, RHBAE :WITH CORRECT ADDRESS 
#2, Q4OFF 11 ‘SETUP RHCS3 ADDRESS 
a#vOFF11,RHCS3 SWITH CORRECT ADDRESS 
RHCS1,RHCS1B [SETUP RHCS1B WITH 

RHCS1B ‘HIGH BYTE ADDRESS OF RHCS1 

@#ERRVEC ,-(SP) SSAVE TIOUT VALUE 
HADDERR, a#ERRVEC ‘SETUP NEW TIOUT VALUE 
#7, @RHCS2 ‘SETUP UNIT NO. 
@RHCS1 ‘WILL RH RESPOND 
#40, @RHDT :1$ A TESTER THERE 
1$ -YES , CONTINUE 

i TESTER IS NOT CONNECTED 
ADDERR+2 ‘BAD ADDRESS 
47, @RHMR2 *IS THERE ALSO A 7 FOR UNIT NO. 

YES, CONT INUE 

[BAD ADDRESS 
ADDERR+2 
(SP) + :CORRECT STACK 
RHTEST ‘YES AN RH IS THERE 
(SP)+, (SP)+ [CORRECT STACK 
(SP) +. A#ERRVEC [REPLACE OLD TIOUT VALUE 
36 ‘RH DID RES. 


NOT 
‘GET CORRECT BASE ADDRESS 
SREPLACE TIEQUT VALUE 
‘1S IT A 70 
:YES LETS MAKE SURE 

SAVE TIME OUT VALUE 


@RETAIN 
ai 76 AREES 


RH70TT 
yarn ag AF me 


#RH11, A#ERRVEC ChECK FOR AN RH 
PIPCKOT IPCI IPCK2! IPCK3 IE3, @RHCS3 

:SET ALL BITS IN RHCS3 
(SP) +, AERRVEC TREPLACE TIMEOUT 


SEQ 0040 
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CZRHBF P11 26-JUL-79 10:13 T1 S THE RH ADRESS DECODE TEST 
2072 006442 104401 006450 TYPE -65$ 23 TYPE ASCIZ ie 
2073 006446 000413 BR 64$ 3GET OVER_THE ASCIZ 
2074 3765$: .ASCIZ <15><12>/TESTING FOR AN RH70/ 
2075 006476 64$: 
2076 006476 005001 CLR R1 + SET UP RH70 FLAG 
2077 006500 000137 006602 JMP RH11+6 3EX 
006504 013746 000004 RH70TT: MOV @VERRVEC, ro} aa : SAVE LOCATION 4 
2079 006510 012737 006530 000004 MOV MFAKE70, @#ERRVEC REPLACE ADDRESS 
006516 012777 000117 174636 MOV PIPCKO! IPCKI  1PCK2! IPCK31TES- @RHCS3 
2081 ;SET ALL BITS 
006524 000137 006576 JMP 9H11+2 sEXIT TEST 
2083 006530 022626 FAKE70: CMP (SP)+, (SP)+ CORRECT STACK 
006532 012657 000004 MOV (SP) +, @#ERRVEC Z CORRECT TIMEOUT 
2085 006536 005001 RH70BA: CLR R1 2GET FLAG READY 
2086 006540 005101 COM R1 T FOR RH11 
2087 006542 104401 006550 TYPE -65$ sTYPE ASCIZ STRING 
006546 000411 BR 643 SIGET OVER THE ASCIZ 
2089 ::65$: .ASCIZ <15><12>/TESTING AN RH11/ 
006572 64$: 
2091 006572 000403 BR ERR1 
2092 006574 022626 RH11: CMP (SP)+, (SP) + ;CORRECT STACK POINTER 
2093 006576 012637 000004 MOV (SP) +, @#ERRVEC ;REPLACE TIMEOUT VALUE 
006602 004737 050244 ERR1: JSR R7,ERRTST 
2095 FARRER EREREREEKREKREREEKEEREREREKEREKEEKRE RARER ERE EH 
T*TEST 2 CLEAR TEST 
2097 :*THIS TEST CHECKS THAT ALL 
2098 i *E RROR BITS ARE CLEARED AFTER 
= * THE CLEAR BIT WAS LOADED INTO 
1 : *RHCS2 NESTS TON ccescassescees 
2101 PPITIIITILIT TIT TITITITI LITT T TTT TL LLL LLL ELL LLL Liks 
2102 006606 000004 TST2: SCOPE 
2103 006610 012737 1 001212 MOV #1,$TIMES 7:D0 1 ITERATION 
2104 006616 0050 001216 CLR STMP5 ;GET READY TO 
2105 006622 005137 001210 STMPS 7SET UP FOR JSR ROUTINE 
2106 SLA ERERERERER ERE 
2107 ;*THIS TEST IS ALSO ENTERED AT THE LABLE CLEER 
2108 ~ ;*AT THE END OF ALL THE ERROR BIT TESTS TO SEE 
2109 7*THAT A CLEAR WILL CLEAR THE ERROR BIT SET 
2110 PPT IIIIITII STITT T TTT LITT TTT TTT TTT TLL EEL LLL LLL LLL 
2111 006626 012777 000040 174504 CLEER: MOV #CLR, @RHCS2 sTELL IT TO CLEAR 
2112 006634 012777 000007 174476 MOV #7, @RHCS2 :SETJP UNIT NO. 
2113 006642 122777 000007 174466 CMPB #7 ,ARHMR2 HAS er ee art ae  & 4 
2114 006650 001107 BNE 1$ [NO.FIND WHA T BIT T SET 
2115 ETE, .. HITE. Ee eee Wd A MAR. 
2116 ;*THE TEST IS ENTERED HERE IF THE ERROR BIT BEING 
2117 7*FORCED SET DID NOT SET TO SEE IF ANY OTHER ERROR 
2118 eRIT DED FSi vensesseccees 
2119 KER RRERRR RRR RRRRRRERR RRR ERR EERE RE REE ERE RE REE RRR ERR RRR 
2120 006652 005701 13s: TST R1 31S_IT AN_11 OR A 70 
2121 006654 100417 BMI 15$ :1T'S A 70 
2122 006656 005737 004122 TST BEFORE ARE WE HERE FOR SHORTS 
2123 006662 001406 BEQ : 
2124 033777 004130 174470 BIT $CS3,@RHCS3 ANY EXTRA ERROR BITS 
2125 006672 001410 BEQ 15$ [NO 
2126 006674 000137 007230 JMP 13$ ;WE FOUND AN ERROR 
2127 006700 032777 174000 174454 14$: BIT #WCELO!WCEHI !DPELO! DPEHI ‘APE ,a@RHCS3 
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2128 
2) 


MoNPoNoNorononononononyefnoenr 
RRR RWW WAG 


26-JUL-79 


001412 
000 
005737 
00 


10:13 

007230 
004122 
004124 


160000 
004122 
004126 


177400 


004122 
004132 


140000 
004122 
004134 


030175 


001210 
001210 


050070 
174240 


046416 


047750 
174206 


046416 


047774 
174174 


046416 


050020 
174156 


046416 


174400 


174366 


174360 


174346 


174332 


174320 


174304 


174272 


004100 


004100 


004100 


004100 


MACY11 30A(1052) 
T2 CLEAR TEST 


15$: 


5$: 


16$: 


6$: 


17$: 


7$: 


18$: 


8$: 


19$: 


1$: 


2$: 


_ 3B: 


4$: 


5$ 
13$ 
BEF ORE 


5$ 
$CS1,@RHCS1 
2$ 


16$ 
| acetate aticiat 


oa 
$6Se. -@RHCS2 


D 
26-JUL-79 
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TEST ERROR BITS 
ZNO 


- WE HERE FOR SHORTS 

:YES SEE IF THERE ARE ANY 
F OUND 

60 CHECK THE NEXT ONE 

ANY yy a A SET IN CS1 

“YES, FIND THEM 

ARE WE HERE FOR SHORTS 


"NO 
ANY SHORTS 


17$ NO CONTINUE 
AMPE !MXF : :PGE !NEM!NED! UPE!WCE !DLT. e@RHCS2 


3$ 

BEFORE 

7$ 
$ST,@RHST 
9$ 


18$ 
MERR! ATA, @RHST 


_— 
a -@RHER 


19$ ; CONT INUE 
MILF IRMR! CPE! DPE! RMBEX!RFAIL!DTE!OPI, 
7 ANY “yr 


R7,FINDIT 
@RHCS1 , RBUF 


72 
R7 ,WATBIT 
16$ 


R7,LOOKFO 
Qa Se ABUF 


3 
R7 ,WATBIT 
17$ 
R7, LOOKED 
ren Ae 


R7,WATBIT 


;ARE ANY ERROR BITS SET IN CS2 
eYES FIND THEM 
ARE WE HERE FOR SHORTS 


=NO 
ZANY SHORTS ? 
; CONT INUE 
zARE ANY ERROR BITS SET IN ER1 
‘ake -GO FIND THEM 
ARE WE HERE FOR SHORTS 


YES SEE IF THER ARE ANY 
OUND SOME 


@RHER 
S IN RHER REG. 
:YES,GO FIND THEM 
iIS iT BEING USED AS A SUBROUTINE 


SETUP SUB ROUTINE FLAG 
;WAS THERE ANY ERRORS 
ERROR 


BIT NOT SET 

STEST REST OF ERROR BITS 

;RHCS1_IN ERROR 

:GET CONTENTS 

ERROR BIT SET i CS1 

SWHAT BIT 

TEST REST OF REGISTERS 
RHCS2 


R1 HAS AN ERROR BIT SET 
‘TELL WHAT BIT 


SEQ 0042 
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001210 :1S_IT BEING USED AS A SUBROUTINE 


iY 
:WAS_THERE ANY ERRORS 
;RHST HAS es BIT SET 


oo 
uw 


LLSSLESLESSSERE 





050044 

174124 3 

046416 S R7,WATBIT 
BR TEs 


050114 13$: R7,CS3ERR 
174122 004100 $3, 


Moronononononoronererenorror 
kd ek ak a ad od od 8 8 


WHYFO: 7 SET 
LEAVE: R7 60 BACK TO PROGRAM THAT SENT YOU HERE 
050244 ERR2: R7,ERRTST 
FL AAA ARERR REAR KRKREKEEKEEEEKRRKEKEKEERKEEEREREKEHEREKEEKEKKEREERREEERKEKEE 
*TEST 3 THIS TEST SEES IF THE yp 2h IS CONNECTED 
s*THIS TEST SEES IF THE DEVICE CODE IS 
;*A 40 TO SAY AN RH SIMULATOR IS ATTACHED 
PPTTITITITIITITTI TTI TTI TT TTT TTT LTT TTT TLE L EL ELLE LLL ite 
TST3: 
0060040 174036 MOV #CLR,@RHCS2 CLEAR TESTER 
000007 174030 #7 ,@RHCS2 UNIT SEVEN 
174042 001172 @RHDT , SREGS “GET DRIVE TYPE 
000040 001172 — :1S 
: TESTER NOT CONNECTED 


E 34 
050244 ERRG: R7.ERRTST : 


Wee AAASASLAAA£ ASSESSES ALARALASASALAS SALSA SEERA SER ASE AA RASS ESSERE SS 


T*TEST 4 WC CLEAR TEST 
;*THIS TEST WILL SEE THAT WHEN A CLEAR IS GIVEN 
HE WORD COUNT REGISTER REMAINS THE SAME 


WR PASSSASEAASLESESALAASAALASASELASESARA SSSA A LAS ASA RS SRR ESAS ASRS SS 


‘TST4: 

000001 MO ::D0 1 ITERATION 

177777 #-1 , @RHWC MAKE WC NEGITIVE 

177777 2 ;WAS IT LOADED CORRECTLY 
BNE :NO,ALL BITS DID NOT SET 

000040 : TELL DEVICE TO CLEAR 

173734 003420 MO @RHCS1,CS1 ;SAVE RHCS1 

173730 :SAVE WORD COUNT 

173724 MOV @RHBA ,BA sista BUS es 


: ZNO IT'S A 70 
:CLEAR Cs3 


TINUE 
[SAVE ba, ADDRESS EXTENSION 
@RHCS3,CS3 i SAVE RHCS3 
@RHCS2,CS2 iSAVE CS2 
173662 @RHST ,DS1 7SAVE TESTER STATUS 
017737 003436 @RHER,ER1 [SAVE ERROR REGISTER 


003416 
3424 
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2240 007470 017737 173654 003442 MOV @RHTDB, TDR SAVE TESTER DATA > Nag 
2241 007476 017737 173634 003440 MOV @RHMR2 , TC 7SAVE MR2 TESTER REG 
2242 75 005777 173622 TST @RHWC :DID IT CLEAR 
2243 007510 001434 BEQ WCERR2 ores CLEAR SHOULD NOT CLEAR wC 
2244 007512 000137 007632 JMP aADOIT O TO NEXT CHECK 
2245 007516 005777 173610 WCERR1: TST ‘DID ANY BITS LOAD 
2246 007522 001416 BEQ :NO 
2247 007524 012737 177777 001162 MOV #-1 , SREGO SSAVE WHAT WC oe ue HAVE BEEN 
2248 7532 017737 173574 003444 MOV @RHWC , WC SAVE CONTENTS OF WC 
2249 007540 104042 ERROR 42 ZALL BITS . NOT SET 
2250 7542 013737 003444 001200 MOV WC, $TMP1 ;SETUP_FOR WATBIT 
2251 007550 737 046416 JSR R7 ,WATBIT ;FIND THE BIT(S) 
2252 007554 137 007362 JMP ERE 7SEE IF BITS SET CLEAR 
2253 007560 013737 177777 001162 1$: MCV ~1,$REGO SETUP FOR ERROR 
2254 7566 017737 173540 003444 MOV @RHWC , WC [GET BAD DATA 
2255 007574 043 ERROR 3 WC DID NOT LOAD ANY BITS 
2256 007576 137 007632 JMP OIT +60 TO yt at 3 TEST 
2257 7602 012737 177777 001162 WCERR2: MOV #-1 ,SREGO ; SETUP GOOD DAT 
2258 007610 017737 173516 003444 MOV @RHWC , WC [GET BAD DATA 
2259 007616 013737 003444 001200 MOV WC, $TMP1 ;SETUP FOR WATBIT 
2260 007624 104044 ERROR 44 :SOME BITS CLEARED IN wC 
2261 007626 004737 046416 JSR R7,WATBIT FIND THE BITS THAT CLEARED 
2262 007632 004737 006626 DOIT: JSR R7,CLEER CLEAR ERRORS 
2263 007636 004737 050244 JSR R7,ERRTST 


G 4 
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CZRHBF P11 26-JUL-79 10:13 T5 RHBA CLEAR TEST . SEQ 0045 
2264 [LURE EERE EERE EERE ERR ER ERE EERE REE EER 
ssoe r*TEST 5 RHBA CLEAR TEST 
2267 z*THIS TEST SEES THAT WHEN A CLEAR IS GENERATED 
2068 :*THE BUS ADDRESS REGISTER IS CLEARED 
5570 FF AAA REAR RAR AREER RAEREEEREEEEEKEEEREREREEREKEEEERREREERRKEKE KE 
2271 007642 000004 TSTS: SCOPE 
2272 007644 012777 177776 173462 ITDO: MOV M-2 ,@RHBA ;SET ALL BITS IN RHBA 
2273 007652 022777 177776 173454 CMP #-2 ,@RHBA TARE THEY ALL SET 
2274 007660 001066 BNE 1$ zALL THE BITS DID NOT SET 
2275 007662 012777 000040 173450 MOV #CLR,@RHCS2 ‘TELL IT TO CLEAR 
2276 007670 017737 173434 003420 MOV @RHCS1,CS1 SAVE RHCS1 
2277 007676 017737 173430 003444 MOV @RHWC . WC SAVE WORD COUNT 
2278 007704 017737 173424 003414 V @RHBA ,BA 7 SAVE us ADDRESS 
2279 007712 005701 TST R 71S 
22 007714 0014 BEQ 87$ ZNO Tee A %0 
2281 16 005037 003416 CLR BAE CLEAR BAE 
22 007722 005037 003424 CLR CS3 rp hong cs3 
2283 007726 000137 007746 JMP 86$ TINUE 
2284 007732 017737 173422 003416 87$: MOV @RHBAE ,BAE SSAVE BUS ADDRESS EXTENSION 
2285 007740 017737 173416 003424 MOV @RHCS3,CS3 TSAVE RHCS3 
2286 007746 017737 173366 003422 86S: MOV @RHCS2,CS2 SAVE CS2 
2287 007754 017737 173362 003432 MOV @RHST,DS1 ‘SAVE TESTER STATUS 
2288 007762 017737 173356 003436 MOV @RHER,ER1 SAVE ERROR REGISTER 
2289 007770 017737 173354 003442 MOV @RHTDB, TDR SAVE TESTER DATA REG. 

007776 017737 173334 003440 MOV @RHMR2 , TC + SAVE » * TESTER REG. 
2291 010004 005777 173324 TST @RHBA 31S IT Z 
2292 010010 001421 BEQ TOIT S TEST ie 6000 
2293 010012 005037 001162 CLR $REGO ‘CREATE GOOD DATA 
2294 010016 017737 173312 001200 MOV @RHBA , STMP1 ‘SETUP FOR WATBIT 
2295 010024 104045 ERROR 45 [RHBA DID NOT CLEAR 
2296 010026 004737 046416 JSR R7,WATBIT FIND BITS STILL SET 
2297 010032 000137 010054 JMP avTOIT 'GO TO NEXT REG. TEST 
2298 -010036 012737 177776 001162 1$: MOV #-2,$REGO SETUP GOOD DATA 
2299 010044 017737 173264 001200 MOV @RHBA.S$TMP1 SETUP FOR WATBIT 
2300 010052 104046 ERROR 46 ‘BITS DID NOT SET IN RHBA 
2301 010054 TOIT: 
2302 010054 004737 006626 JSR R7,CLEER CLEAR ERRORS 
2303 010060 004737 050244 JSR R7,ERRTST 
2304 FARRAR EEE EERERKEEKEEREREKEREREREKEKKE EK 
2305 SSTEST 6 RHBAE CLEAR TEST 
2306 :*THIS TEST CHECKS THAT WHEN A CLEAR IS GENERATED 
2307 3 *THE BUS ADDRESS EXTENSION REGISTER IS CLEARED 
2308 PITTI I TILL TITTLE LLCO LLL 3 
2309 010064 000004 TST6: SCOPE 
2310 010066 005701 TST R1 31S IT A 70 OR AN 11 
2311 010070 100510 BMI TST7 ::SKIP OVER TEST FOR RH11 
2312 010072 012777 000077 173260 WATFOR: MOV #77 , @RHBAE SET ALL BITS IN RHBAE 
2313 010100 022777 000077 173252 CMP #77 , @RHBAE sARE THEY ALL SET 
2314 010106 001066 BNE 1$ sALL THE BITS DID NOT SET 
2318 010110 012777 000040 173222 MOV #CLR,@RHCS2 sTELL IT TOC 
2316 0106116 017737 173206 003420 MOV @RHCS1,CS1 SAVE RHCS1 
2317 010124 017737 173202 003444 MOV @RHWC , WC SAVE WORD COUN 
2318 010132 017737 173176 003414 MOV @RHBA , BA SAVE BUS ADDRESS 
2319 010140 005701 TST R1 71S IT AN RH11 


CZRHBF .P11 
010142 
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017737 


WIVAIVVVSsS 
® SY VKRSKSSRRRS 


SF x 
S32 


172662 
172656 


173030 
173004 


172762 


MACY11 30A(1052) 
T6 RHBAE CLE 


@RHBAE ,BAE 
@RHCS3,CS3 
@RHCS2,CS2 
ST,DS1 
@RHER ,ER1 
@RHTDB, TDR 
@RHWR2 TC 
@RHBAE 
WATFIV 
SREGO 


@RHBAE , $TMP 1 
100 


R7,WATBIT 
@AWATFIV 
1$: #77 ,SREGO 


@RHBAE , $TMP1 


101 


R7,CLEER — 
R7.ERRTST 


WATFIV: 


H 
26-JUL-79 
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;NO_IT'S A 70 
CLEAR BAE 
ZCLEAR CS3 

; CONT 


INUE 
;SAVE BUS ADDRESS EXTENSION 
; SAVE RHCS3 


VE CS2 
SAVE TESTER STATUS 
SAVE ERROR REGISTER 
SAVE TESTER DATA REG. 
4 tino TESTER REG. 


STEST IS GOOD 

ZCREATE GOOD DATA 
>SETUP FOR WATBIT 
;RHBAE DID NOT CLEAR 
:FIND BITS STILL SET 


:GO TO — REG. TEST 


;SETUP GOOD nee 
[SETUP FOR WA TBIT 
:BITS DID NOT SET IN RHBAE 


:CLEAR ERRORS 


ah. 7. mak aan eee oe ee ae 


s*TEST 7 RHDB CLEAR 


TEST 
:*THIS TEST CHECKS THAT WHEN A CLEAR IS GENERATED 
;*OUTPUT READY IS NEGATED 


 CLREKRERRRRERERERRRERE REE RRR ERE EERE EERE ERR 


1817: 


18$: 


@RHBAE ,BAE 
@RHCS3,CS3 
@RHCS2,CS2 
@RHST ,DS1 
@RHER ,ER1 


:SET ALL BITS IN RHDB 
;CLEAR BIT COUNTER 
:1S_OR SET 


:BIT IS SET 
UP 


; COUNT 
:NOT FINISHED COUNTING 
:GET READY TO DO IT AGAIN 


SIS IT SET YET? 
sVES 


; COUNT UP 
;BIT IS NOT GOING TO SET 


7 SAVE RHCS1 


TINUE 
“SAVE BUS ADDRESS EXTENSION 
: SAVE RH RHCS3 


VE CS2 
7SAVE TESTER STATUS 
. SAVE ERROR REGISTER 
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2376 010470 017737 172654 003442 MOV @RHTDB, TDR :SAVE TESTER DATA REG. 
2377 010476 017737 172634 003440 MOV @RHMR2. T TSAVE MR2 TESTER REG. 
2378 010504 032777 000200 172626 BIT #OR, @RHCS2 SIS OUTPUT READY SET 

2379 010512 001001 BNE HURTS SYES ,CONTINUE TEST 

2380 010514 104041 ERROR 41 ZOUTPUT READY DID NOT SET 
2381 010516. 022777 177777 172626 HURTS: —CMP #-1, [DID INFO GET LOADED TO DB 
2382 010524 005037 003446 CLR BITCNT :CLEAR BIT TE 

2383 010530 032777 200 172602 18$: BIT WOR, ARHCS2 SET 

2384 010536 001015 BNE 56 :BIT IS SET 

2385 010540 005237 003446 INC BITCNT [COUNT UP 

2386 010544 001371 BNE 18$ =NOT FINISHED COUNTING 
2387 010546 005037 003446 n BITCNT [GET READY TO DO IT AGAIN 
2388 010552 032 200 172560 19$: BIT #OR , @RHCS TIS IT SET YET? 

2389 010560 001 BNE SG ZYES 

2390 010562 005237 003446 INC BITCNT [COUNT UP 

2391 010566 001401 BEQ SG BIT IS NOT GOING TO SET 
2392 010570 770 BR 1 

2393 010572 DBMSG 

239% 010572 012777 000040 172540 MOV #CLR,@RHCS2 :TELL IT TO CLEAR 

2395 01 005037 003446 CLR BITCNT [CLEAR THE COUNTER 

239% 01 032777 000200 172526 18%: BIT #OR, @RHCS2 [DID OUTPUT READY CLEAR 
2397 010612 001403 BEQ SNAF OO SYES GET OUT OF L 

2398 010614 005237 003446 INC BITCNT INCREMENT COUNT LOOP 
2399 010620 001371 BNE 18S [CONTINUE LOOP IF NO CARRY 
2400 010622 032777 000200 172510 SNAFOO: BIT #OR , @RHCS2 1S OUTPUT READY CLEARED 
2401 010630 001403 BEQ 1$ :YES,EXIT TEST 

2402 910632 104114 ERROR 114 OUTPUT READY NOT CLEARED 
2403 ‘BY SETTING CLR IN RHCS2 
2404 010634 004737 007260 JSR R7 .WHYFO TANY ERROR BITS SET 

2405 010640 004737 006626 1$: JSR R7.CLEER ZCLEAR ERRORS 

2406 010644 004737 050244 JSR R7.ERRTST 

2407 J LARA REAR EKEEKEEEEEEEEKKEEE 
2408 T*TEST 10 PROM REGISTER DECODE TEST 

2409 :*THIS TEST CHECKS THAT THE PROM 

2410 [*CAN ACCESS ALL REGISTERS 

2411 PTT IITITILILI TITTLE LELEE ELE ELLE 
2412 010650 TST10: SCOPE 

2413 010652 023727 003366 160100 CMP DEVIC1,4160100 . ;CHECK FOR WHAT REG END 
2414 010660 001 BNE 1$ ARE OK 

2415 010662 013704 003356 1$: MOV RHDT .R4 :SETUP TO TEST RH11 

2416 010666 005724 TST (R4)+ [CORRECT ADDRESS 

2417 010670 023704 003360 CMP RHBAE .R4 TARE ALL REGISTERS CHECKED 
2418 010674 001526 BEQ ERR3 [WERE THERE ANY ERRORS 
2419 010676 005724 2s: IST (R4)+ [TEST REGISTER 

2420 010700 001 BNE 3$ [SOME INFORMATION WAS FOUND 
2421 010702 023704 003360 CMP RHBAE .R4 SARE ALL REGISTERS CHECKED 
2422 010706 001521 BEQ ERR3 WAS THERE ANY ERRORS 
2423 010710 77, BR 2$ :TEST NOT COMPLETED 

2424 010712 005744 3$: TST =(R4) [CORRECT ADDRESS 

2425 010714 010437 003416 MOV R4 ,BAE SAVE ADDRESS 

2426 010720 011437 001162 MOV (R4) ,SREGO :GET CONTENTS 

2427 010724 017737 172416 003412 MOV @RHAS , AS GET ATTENTION SUMMARY 
2428 010732 104052 ERROR 52 ALSE INFO IN FAKE REGISTER 
2429 010734 005003 CLR R3 ‘GET OFFSET READ 

2430 010736 013737 003330 003420 MOV RHCS1,CS1 {GET ADDRESS TO START CHECKING 
2431 010744 027737 172450 001162 29%: CMP ac$1,$REGO [HAS A REGISTER BEEN FOUND THAT COMPARES 


26-JUL-79 


10:1 


MACY11 yt 
17 DB CLEAR T 


I 
ey Ui-79 


4 
10:39 PAGE 48 
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CZRHBF.P11 = 26=JUL=79 10:13 T10 PROM REGISTER DECODE TEST SEQ 0048 
2432 010752 001412 BEQ 28$ sYES,PRINT IT OUT 

2433 010754 023737 003356 003420 30%: CMP RHDT,CS1 31S IT LAST REG IN RH11 
2434 010762 001473 BEQ ERR3 WAS THERE ANY ERRORS 
2435 010764 062737 000002 003420 ADD #TWO,CS1 “NO, CORRECT FOR NEXT CHECK 
2436 010772 703 000004 ADD #4 ,R3 SCORRECT OFFSET 

5437 010776 762 BR 29$ CONT INE CT TEST 

2438 011000 032737 020000 177570 28%: BIT #S5W13,a4#177570 ‘SKIP ERROR PRINTOUT 
2439 011006 001024 BNE 5$ *SKIP MESSAGE 

2440 011010 104401 011016 TYPE ,65$ :TYPE ASCIZ STRING 

2441 011014 000421 BR 64$ [GET OVER THE ASCIZ 

2442 :;65$: .ASCIZ <15><12>/REGISTER’ CONTENTS COMPARES TO:/ 
2443 011060 64$: sail 
2444 011060 000163 011064 55$: JMP 27$(R3) sPRINT REGISTER 

2445 011064 104053 27$: ERROR 53 SRHCS1 

2446 011066 000732 BR 30s [CONTINUE TEST 

2447 011070 104054 ERROR 54 ;RHWC 

2448 011072 000730 BR 30$ SCONTINUE [EST 

2449 011074 104055 ERROR 55 *RHBA 

2450 011076 000726 BR 30s [CONTINUE TEST 

2451 011100 104056 ERROR 56 *RHMR2 

2452 011102 000724 BR 30$ s CONTINUE TEST 

2453 011104 104057 ERROR 57 *RHCS2 

2454 011106 000722 BR 30$ CONTINUE TEST 

2455 011110 104060 ERROR 60 *RHST 

2456 011112 000720 BR 30$ : CONTINUE TEST 

2457. 011114 104061 ERROR 61 SRHER 

2458 011116 000716 BR 30$ ; CONTINUE TEST 

2459 011120 104062 ERROR 62 : 

2460 011122 000714 BR 30$ *CONTINUE TEST 

2461 011124 104063 ERROR 63 RHT | 

2462 011126 000712 BR 30$ SCONTINUE TEST 

2463 011130 104064 ERROR 64 *RHDB 

2464 011132 000710 BR 30$ S CONTINUE TEST 

2465 011134 104065 ERROR 65 *RHMR1 

2466 011136 000706 BR 20$ [CONTINUE TEST 

2467 011140 104066 ERROR 66 SRHDT 

2468 011142 000704 BR 30$ [CONTINUE TEST 

2469 011144 104067 ERROR 67  RHBAE 

2470 011146 000702 BR 30S [CONTINUE TEST 

2471 011150 104070 : ERROR 70 ;RHCS3 

2472 011152 004737 050244 ERR3: JSR R7,ERRTST 

2473 011156 004737 006626 JSR R7.CLEER ZCLEAR ERRORS 

2475 LL AAR KEEAEEEEEEREREEEEKEEEEKEEREKEEKEEEEEEREEEREREREEREKEKERE 
2476 :*TEST 11 RHCS3 TEST 

2477 :*THIS TEST CHECKS THE READ/WRITE BITS 

2478 :*IN THE RHCS3 REGISTER CAN BE CLEARED AND SET. 

2479 na» pqggy---> gp aepamaa eee een ren eaenmatammanaettls 
2480 011162 TST11: SCOPE 

2481 011164 012777 000040 172146 MOV #CLR,@RHCS2 :CLEAR TESTER 

2482 011172 012777 000007 172140 MOV #7, ARHCS2 [SETUP UNIT SEVEN 

2483 011200 005701 TST R1 71S IT AN RH70 

2484 011202 001122 BNE TST12 Zi THIS 15 A RHT1 

2485 011204 012737 000004 003450 MOV #4, LOOCNT SETUP LOOP COUT OF FOUR 
2486 011212 012737 000001 001162 MOV #1, $REGO [SETUP BIT TO BE TESTED 
2487 011220 013777 001162 172134 1$: MOV $REGO, ARHCS3 [SET THE BIT 
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CZRHBF P11 26-JUL-79 10: 13 T11 RHCS3 TEST SEQ 0049 
2488 011226 017737 172130 003424 MOV @RHCS3, So ;SAVE CONTENTS OF RHCS3 
2489 011234 013737 063424 001200 MOV CS3,$TMP + SETUP FOR WHAT ~~ IF NEEDED 
2490 0112462 123777 001162 172112 CMPB $REGO, SRNCS3 71S THE BIT = 
2491 011250 022 ; BNE 2s =NO, GO TO ERR 
2492 011252 006137 001162 ROL $REGO + SETUP TO fest NEXT BIT 
2493 011256 005337 003450 - DEC LOOCNT 371 TO THE LOOP COUNT 
2494 011262 001356 BNE 1$ ;TEST NEXT BIT 
2495 011264 012737 000100 001162 MOV HES $REGO ;SET INTERRUPT BIT 
2496 011272 013777 001162 172062 MOV $REGO, ARHCS3 SET BIT 
2497 011300 017737 172056 003424 MOV itd HESS. CS3 :SAVE CONTENTS 
2498 011306 023777 001162 172046 CMP SREGO, @RHCS3 :1S BIT SET? 

2499 011314 001451 _BEQ ERRS ;WAS THERE AN ERROR 

2500 011316 2$: 

2501 011316 017737 172006 003420 MOV @RHCS1,CS1 ; SAVE RHCS1 

2502 011324 017737 172002 003444 MOV @RHWC WC SAVE WORD COUNT 

2503 011332 017737 171776 003414 MOV @RHBA ,BA ‘SAVE BUS ADDRESS 

2504 011340 005701 TST R1 1S IT AN RH11 

2505 011342 406 BEQ 87$ iNO IT'S A7 

2506 011344 005037 003416 CLR BAE ;CLEAR BAE 

2507 011350 005037 3424 CLR CS3 ;CLEAR CS3 

2508 011354 000137 011374 JMP 86$ ; CONT INUE 

2509 011360 017737 171774 003416 87$: MOV @RHBAE ,BAE ;SAVE BUS ADDRESS EXTENSION 
2510 011366 017737 171770 003424 MOV @RHCS3,CS3 i SAV VE RHCS3 

2511 011374 017737 171740 003422 86$: MOV @RHCS2,CS2 SAVE CS2 

2512 011402 017737 171734 003432 MOV @RHST ,DS1 + SAVE TESTER STATUS 

2513 011410 017737 171730 003436 MOV @RHER ,ER1 SAV VE ERROR REGISTER 
2514 011416 017737 171726 003442 MOV @RHTDB, TDR [SAVE TESTER DATA REG. 
2515 011424 017737 171706 003440 MOV @RHMR2 , TC ;SAVE MR2 TESTER REG. 
2516 011432 104035 ERROR 35 :BIT DID NOT SET 

2517 011434 004737 046416 JSR R7,WATBIT ;TELL WHAT BIT POSITION IS NO GOOD 
2518 011440 004737 050244 ERRS: JSR R7. ERRTST 

74h 011444 004737 006626 JSR R7,CLEER ;CLEAR ERRORS 

2521 DIGIC ISISISICISIOISIOICIIOISIOISIIOICIOICIDIOIIOICIOIOIOIOIOIIOIIUIOIIOIIOIIIOI IOI TOT TOIT TOT TOT TOT 
2522 *STEST 12 RHWC BIT TEST 

2523 z*THIS TEST CHECKS THE WORD COUNT REGISTER 

2524 :*TO SEE IF ALL BITS CAN BE SET AND CLEAR ED 

2525 7*AND CHECKS ys ge tee USING ALTERNATE BITS 

2526 :*SET (52525) USING (125252) TO MAKE SURE 

2527 :*]T WORKS ante ALTERNATE PATTERN. 

2528 KKORKERERERERERERERERERERERERERERRERERRERERERERRER ERR RR RR 
2529 011450 000004 TsT12: SCOPE 

2530 011452 012737 000001 001162 MOV HONE , SREGO ;SET UP REFERANCE WORD 
2531 011460 013777 001162 171644 RHWCT: MOV $REGO, @RHWC ‘MOVE BIT INTO WORD COUNT REGISTER 
2532 011466 023777 001162 171636 CMP SREGO, @RHWC 71S BIT SET? 

2533 011474 001454 BEQ 1$ :YES, CONTINUE BIT TEST 
2534 011476 013737 003444 001200 MOV WC, STMP1 SETUP FOR WATBIT PROG. 
2535 011504 004737 046416 JSR R7,WATBIT 60 TO WATBIT PROGRAM 
2536 011510 017737 171614 003420 MOV @RHCS1,CS1 ;SAVE RHCS1 

2537 011516 7737 171610 003444 MOV @RHWC , WC :SAVE WORD COUNT 

2538 011524 017737 171604 003414 MOV @RHBA ,BA 7SAVE BUS ADDRESS 

2539 011532 005701 TST R1 1S IT AN RH11 

2540 011534 001406 BEQ 87$ iNO IT'S A 7 

2541 011536 005037 003416 CLR BAE :CLEAR BAE 

2542 011542 005037 003424 CLR Cs3 sCLEAR CS3 

2543 011546 000137 011566 JMP 86$ : CONTINUE 
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CZRHBF .P11 26-JUL-79 10:13 T12 RHWC BIT TEST SEQ 0050 


017737 60. 87$: @RHBAE ,BAE SAVE BUS ADDRESS EXTENSION 
5 86s ; SAVE RHCS3 


S 
= 


;SAVE CS2 
sSAVE TESTER STATUS 
;SAVE ERR GISTER 


BROESSR 


NO, THEN TEST NEXT BIT 
D0 BIT TEST AGAIN 
T UP Sate ai ne PATTERN 


a) os Ss Ss Ss 


esssssesssssss 
Sree 


Sns5 


001162 
171454 
003444 
171440 


aee6 


: CONT INUE 
SAVE BUS ADDRESS EXTENSION 
3 SAV E RHCS3 
VE CS2 
‘SAVE TESTER STATUS 
; TER 


TER REG. 


:SET UP ALTERNATE OPPISITE ts 
:SET gtk Baer, E BITS 
@RHWC , WC ZSAVE CONTENTS OF RHWC 
171256 MP ae ZARE oom el BITS SET? 


THERE AN ERROR 
001200 [SETUP FOR WATBIT PROG. 
R7WATBIT :GO TO WATBIT PROGRAM 


003420 : @RHCS1,CS1 ;SAVE RHCS1 
@RHWC , WC 


e 


R1 
os 


$3 
86$ 


“CONT INUE 
@RHBAE ,BAE 7SAVE BUS ADDRESS EXTENSION 
@RHCS3,CS3 SAVE RHCS3 
@RHCS2,CS2 iSAVE CS2 
@RHST ,DS1 7SAVE TESTER STATUS 
017737 @RHER,ER1 SAVE ERROR REGISTER 





MASSBUS RH70 AND RH11_D1 
26-JUL-79 


CZRHBF .P11 


01 
012176 
012204 


012312 


012516 


017737 
017737 


S —_—_ —> 
: 3 25 
Ww — 2 ee 
wie ot 
w w ws 

Nm ¥¥ 


g8 
VS 


aS 


tt 
N 
N 
so 
st 


=] 
w 
o 
™m 
= 
aos 


TIC 


a gy ys E 


RHWC BIT TEST 
MOV @RHTDB, TDR 
MOV @RHPR2, TC 
ERROR 1 

ERR6: MOV e 
MOV #ZERO, aRHWC 
MOVB MINUS , @SRHWC 
CMP #377, 
BEQ HIBYTE 
ERROR 200 

HIBYTE: INC SRHWC 
MOV #ZERO, aRHWC 
MOVB MINUS+1, a$RHWC 
CMP #177400, aRHWC 

Q ALRIGT 

ERROR 200 

ALRIGT: JSR R7,ERRTST 
MOV #ZERO, aRHWC 


JSR R7,CLEER 
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Aree GS eS vesten DATA eee 

‘Sppistie BIT "Est FAILED 

3GET READY TO TEST BYTES 
WC FIRST 


ZCHECK L LOBYTE 
ANY pr BITS 


0K SO F 
;HIBYTE GATE NOT WORKING PROPERLY 
;GET READY FOR NEXT BYTE 


SCLEAR WC 

7CHECK THE HI BYTE 

IS IT OK 

:1ITS OK 

;LOBYTE GATE NOT WORKING PROPERLY 


CLEAR WORD COUNT 
:CLEAR ERRORS 


J AAAAAAAEAAREEREEAEERAERAEERERERHEEKERKREEEEKEREEEEEEEEEEKEKEREEREKKEEEE 


SS TEST 13 


 *ONLY IF THE 
:*DO NOT HAVE AN RHBAE 
78113: SCOPE 
TST R1 
BNE TST14 - 
MOV #1,$REGO 
BAETST: MOV SREGO, @RHBAE 
MOV @RHBAE ,BAE 
CMP SREGO, @RHBAE 
BEQ 1$ 
MOV BAE , STMP1 
JSR R7 ,WATBIT 
MOV @RHCS1,CS1 
MOV @RHWC , WC 
MOV , 
TST R1 
BEQ 87$ 
CLR BAE 
CLR cs3 
JMP 86$ 
87$: MOV 
MOV @RHCS3,CS3 
86$: MOV @RHCS2,C 
MOV @RHST, 
MOV @RHER 1 
MOV @RHTDB, TDR 
MOV e 
ERROR 2 
1$: CMP #40,$REGO 
BEQ ERR? 


21S RH AN 
32NO PASS OVER Test 


RHBAE BIT TEST 
s*THIS TEST TESTS THE RHBAE REGISTER 


SRERAEEAKEAEEEREREEAEKERAEKEAKEREKKKEEKEAEKKERERKEEEKEAEREEKEREREEKRKEEKERKEKKEH 


RH70 
T UP BIT TEST 
:SET BIT IN RHBAE REGISTER 
2 SAVE an OF RHBAE REGISTER 


:YES CONTINUE TEST 


: NUE 
7SAVE BUS ADDRESS EXTENSION 
TSAVE RHCS3 


zSAVE CS2 
; SAVE TESTER STATUS 
VE E REGISTER 
SAVE TESTER DATA REG. 
sSAVE MR2 TESTER RE 
:BIT DID NIT SET 
:I1S_IT LAST py! TO BE TESTED 
WAS THERE AN ERROR 


:NO,SET UP_FOR NEXT BIT 
CONTINUE TEST 


SEQ 0051 
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CZRHBF .P11 26-JUL=79 10:1 11 RHBAE BIT TEST 


012520 004737 006626 ERR7: JSR R7,CLEER CLEAR ERRORS 
012524 004737 050244 JSR R7,ERRTST 


aah. oma ae ee 


TATEST 14 RHBA BIT TEST 
:*THIS TEST TESTS THE BUS ADDRESS aS creaking 


3 BIT 
[*OPPOSITE BIT PATTERN (125252) 


kERRRRRRERRRRRER EERE ERERRRRRRRRRRRERERRRERERRRERR EERE RRR 


000004 rST14: SCOPE 


012737 000002 MOV #TWO, SREGO ;SET UP BIT TEST 
$REGO. @RHBA SSET BIT IN RHBA REGISTER 
SSAVE CONTENTS OF BA REGISTER 


INUE 
SAVE BUS ADDRESS EXTENSION 
7 SAVE RHCS3 


cS2 
SAVE TESTER STATUS 
SAVE ERROR REGISTER 
ZSAVE TESTER DATA REG. 
SSAVE MR2 TESTER REG... 
NO, CORRECT BITS ARE NOT SET 
360 TBIT PROGRAM 


I 
HE LAST BIT TESTED 


"BR 
BATSTA: . MOV 
*BIC 


RHBA REGISTER 
ONTENTS 4 BA REGISTER 
ARE CORRECT wg bE SET 
YES. CONTINUE T 
SETUP FOR WATBIT PROG. 
SAVE RHCS1 


@RHWC , WC :SAVE WORD COUNT 
170316 @RHBA ,BA ; SAVE _BUS me tg 
R 71S JT AN RH11 
:NO_I 70 


BA, STMP1 
@RHCS1,CS1 


003416 
003424 
013054 
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CoRer P11. 26=JUL=79 10:1 T14 RHBA BIT TEST SEQ 0053 
2712 013040 017737 170314 003416 87$: MOV ar ;SAVE BUS ADDRESS EXTENSION 
271 01 3046 017737 170310 003424 MOV @RHCS aS ;SAVE RHCS3 
2714 013054 017737 170260 003402 86$: MOV @RHCS2,CS2 VE CS2 
2715 013062 017737 170254 003432 MOV @RHST,DS1 “SAVE TESTER STATUS 
2716 013070 017737 170250 003436 MOV @RHER,ERT TSAVE ERROR REGISTER 
2717 013076 017737 170246 003442 MOV @RHTDB, TDR TSAVE TESTER DATA REG. 

2718 013104 017737 170226 0034 MOV @RHMR2.TC ; SAVE MR2 TESTER REG. 
2719 013112 104003 ERROR 3 NO, CORRECT BITS ARE NOT SET 
2720 013114 737 046416 JSR R7,WATBIT 760’ TO WATBIT PROGRAM 
2721 013120 012737 125252 001162 18: MOV #OAR., $REGO SSET UP OPPOSITE ALTERNATE BIT TEST 
2722 013126 013777 001162 170200 MOV $REGO, @RHBA “SET BITS IN RHBA R R 
2723 013134 017737 170174 003414 MOV : [SAVE CONTENTS OF BA REGISTER 
2724 013142 023777 001162 170164 CMP $REGO,@RHBA TARE CORRECT 
2725 013150 001454 REQ ERR10 [WAS THERE AN ER RROR 
2726 013152 013737 003414 001200 MOV BA,$TMP1 [SETUP FOR WATBIT PROG. 
2727 013160 GOOF ED: 
2728 013160 017737 170144 003420 MOV @RHCS1,CS1 SAVE RHCS1 
2729 013166 017737 170140 003444 MOV @RHWC , WC SAVE WORD COUNT 
2730 013174 017737 170134 003414 MOV @RHBA.BA + SAVE Bus ADDRESS 
2731 013202 005701 TST R1 ‘IS IT AN RH11 
2732 013204 001406 BEQ 87$ [NO 3T° SA 70 
2733 01 005037 003416 CLR BAE [CLEAR BAE 
2734 013212 005037 003424 CLR Cs3 [CLEAR CS3 
2735 013216 000137 013236 JMP 86S * CONT INUE 
273 013222 017737 170132 003416 87$: MOV @RHBAE , BAE TSAVE BUS ADDRESS EXTENSION 
2737 013230 017737 170126 003424 MOV @RHCS3,CS3 :SAVE RHCS3 

013236 017737 170076 003422 86$: MOV @RHCS2,CS2 TSAVE CS2 
2739 013244 017737 170072 003432 MOV @RHST,DS1 : SAVE TESTER STATUS 
2740 013252 017737 17 003436 MOV @RHER.ER1 SAVE ERROR REGISTER 
2741 013260 01 170064 003442 MOV @RHTDB, TDR : SAVE TESTER DATA REG. 
2742 013 017737 170044 003440 MOV @RHMR2. TC SSAVE MR2 TESTER REG. 
2743 013274 104 ERROR 3 [NO, CORRECT BITS ARE NOT SET 
2744 013276 004737 046416 JSR R7,WATBIT G0’ TO WATBIT PROGRAM 
2745 013302 013737 003334 004136 ERRI0: MOV RHBA, SRHBA [GET READY TO TEST BYTES 
2746 013310 012777 000000 170016 MOV #ZERO, @RHBA ZERO THE BUS ADDRESS 
2747 013316 113777 004120 170612 MOVB MINUS. @$RHBA “MOVE THE 
2748 013324 022777 000376 170002 CMP #376, @RHBA ‘DID IT GET THERE ALRIGHT 
2749 013332 001401 BEQ 99$ tYES,CHECK NEXT BYTE 
2750 013334 104202 ERROR 202 ‘HIGH BYTE DOES NOT SEEM TO BE WORKING 
2751 013336 005237 004136 99$: INC $RHBA “GET READY FOR NEXT BYTE 
2752 013342 012777 000000 167764 MOV #7ERO, @RHBA ZERO THE BUS ADDRESS 
2753 013350 113777 004121 170560 MOVB § MINUS*1,@$RHBA : TO 
2754 013356 022777 177400 167750 CMP #177400. @RHBA [DID IT GET THERE ALRIGHT 
2755 013364 001401 BEQ 98$ :YES.EXIT TEST 
2756 13366 104202 ERROR 202 SLOBYTE IS NOT WORKING PROPERLY 
2757 013370 004737 006626 98$: JSR R7,CLEER *CLAER ERRORS 
2758 013374 004737 050244 JSR R7_ERRTST 
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CZRHBF P11 26-JUL=79 10:13 114 RHBA BIT TEST , SEQ 0054 
7 
sree FERRARA ERAEAEAARAERERRERAERAERRAEREERAERERAEERARREREKERERER EE 
2762 PATEST 15 RHDB BIT TEST 
2763 :*THIS TEST TESTS THE RH DATA BUFFER REGISTER 
2764 7*BY FIRST ALTERNATLY SETTING AND RESETING BITS 
2765 >*IN_THE RHDB R ER AND THEN 
7 ;*ALTERNATE BIT PATTERN (52525 — AN OPPISITE 
2767 ;*ALTERNATE BIT PATTERN (125 
2768 yy IE Sn As tre Bow Bitch. od ~~ RE DON 
2769 013400 000004 TST15: SCOPE 
is 
2772 013402 005037 003450 CLR LOOCNT ; CLEAR rT COUNT 
2773 ~=013406 012737 000001 001162 MOV HONE , SREGO SET UP BIT TEST 
2774 013414 013777 001162 167750 DBTST: MOV $REGO, @RHDB SET BIT IN RHDB REGISTER 
2775 013422 005037 003446 CLR BITCNT [CLEAR BIT COUNTER 
2776 013426 032777 000200 167674 188: BIT #RDY ,@RHCS1 :1S_RDY SET 
2777 ~=013434 001015 BNE ABLE 3BIT IS SET 
2778 013436 005237 003446 INC BITCNT ; COUNT UP 
2779 ~013442 001371 BNE 18$ NOT FINISHED COUNTING 
2780 013444 005037 003446 CLR BITCNT GET READY TO DO IT AGAIN 
2781 013450 032777 000200 167652 19$: BIT ARDY ,ARHCS1 31S IT SET YET? 
2782 013456 001004 BNE ABLE 7 YES 
2783 013460 005237 003446 INC BITCNT : COUNT UP 
2784 013464 001401 BEQ ABLE :BIT IS NOT GOING TO SET 
2785 013466 000770 BR 19$ 
2786 013470 ABLE: 
2787 013470 017737 167634 003420 MOV @RHCS1,CS1 :SAVE RHCS1 
2788 013476 017737 167630 003444 MOV @RHWC , WC :SAVE WORD COUNT 
2789 013504 017737 167624 003414 MOV aRHBA ,BA :SAVE_BUS ADDRESS 
2790 013512 005701 TST R1 :1S IT AN RH11 
2791 013514 001406 BEQ 87$ :NO_IT'S A 70 
2792 013516 005037 003416 CLR EAE :CLEAR BAE 
2793 013522 005037 003424 CLR (‘$3 :CLEAR CS3 
2794 013526 000137 013546 JMP 86$ ; CONT INUE 
2795 013532 017737 167622 003416 87$: MOV @RHBAE ,BAE SSAVE BUS ADDRESS EXTENSION 
2796 013540 017737 167616 003424 MOV @RHCS3,CS3 7SAVE RHCS3 
2797 013546 017737 167566 003422 86$: MOV @RHCS2,CS2 sSAVE CS2 
2798 _ 013554 017737 167562 003432 MOV @RHST ,DS1 ; SAVE TESTER STATUS 
2799 013562 017737 167556 003436 MOV @RHER,ER1 ERROR REGISTER 
2800 013570 017737 167554 003442 MOV @RHTDB, TDR SAVE TESTER DATA REG. 
2801 013576 017737 534 003440 MOV @RHMR2 , TC 7SAVE_MR2 TESTER REG. 
2802 013604 032777 167516 BIT #RDY ,@RHCS1 31S READY SET 
2803 013612 001003 RDYSET :SKIP ERROR 
2804 013614 104102 ERROR 1 READY DID NOT SET 
2805 013616 004737 007260 JSR R7 ,WHYFO sANY ERRORS SET 
2806 013622 032777 000200 167510 RDYSET: BIT MOR , @RHCS2 21S OR_SET? 
2807 013630 001004 BNE ORSET sYES,IT'S SET 
2808 013632 017737 167514 003426 MOV @RHDB , DB SAVE CONTENTS OF RHDB REGISTER 
2809 013640 104041 ERROR 41 SOUTPUT READY DID NOT SET 
2810 013642 017737 167504 003426 ORSET: MOV @RHDB , DB :SAVE CONTENTS OF REGISTER 
2811 013650 023737 001162 003426 CMP $REGO DB 21S CORRECT BIT SET? 
2812 013656 001406 BEQ $ 7YES.CONTINUE TEST 
2813 013660 013737 003426 001200 MOV DB, S$TMP1 SETUP FOR WATBIT PROG. 
2814 013666 104004 ERROR :NO,CORRECT BIT IS NOT SET 
2815 013670 004737 046416 JSR R7 ,WATBIT :GO TO WATBIT PROGRAM 





MASSBUS RH70 AND RH11_DIAGNOSTIC 
CZRHBF .P11 


014164 
0141 
0 


So 
= 
* 
_ 
aN 


— 
™ 
x38 


26-JUL-79 


10:13 
001162 
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00 
167160 


167160 
003426 
001200 
001162 
167120 


167074 


MACY11 30A(1052) 
T15 RHDB BIT 


1$: 


19$: 


DBOUT : 


878: 
86$: 


2$: 


1$: 


18$: 


D 
26-JUL=79 
TEST 


° 


@RHCS2,CS2 
@RHST,DS1 
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SEQ 0055 


15 THE LAST BIT TESTED 
0 at gle BIT PATTERN TEST 


OOP COUNT 
SET UP TO TEST NEXT BIT 
TEST BIT 

IT FIRST TIME 


Bement LOOP COUNTER 
SET UP_BIT PATTERN TEST 
7SET BITS IN REGISTER 
CLEAR BIT COUNTER 
:I1S_OR SET 

:BIT is SET 

: COUNT UP 


SNOT FINISHED COUNTING 
:GET READY TO dO IT AGAIN 
S_IT SET YET? 


OUNT UP 
:BIT IS NOT GOING TO SET 


3SAVE RHCS1 


: CON 
s SAVE ee EXTENSION 


3; SAVE 
:SAVE TESTER STATUS 


: YES, CONTINUE TEST 

SSAVE CONTENTS OF REGISTER 

SSETUP FOR WATBIT TEST 

NO, CORRECT BITS ARE NOT SET 
TO WATBIT PROGRAM 


:SET UP_OPPISITE peat BIT PATTERN TEST 
SET BITS_IN REGISTE 

SCL LEAR BIT COUNTER 

:1S_OR SET 


BIT IS SET 
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003446 


003446 
000200 


003446 


167024 
167020 
167014 


006626 
050244 


177777 
000007 


167052 


003420 
003444 
003414 


001200 


166632 
166632 

66640 
166606 
166574 
166562 


i gy She 


RHDB B 
INC BITCNT 
BN 18$ 


ey. 
26-JUL=79 10:39 PAGE 57 
TEST 


; COUNT UP 
NOT FINISHED COUNTING 
;GET READY TO DO IT AGAIN 


19$: BIT #OR , ARHCS2 tI1$ IT SET YET? 
BNE OABTST ‘YES 
INC BITCNT = COUNT UP 
BEG OABTST ‘BIT IS NOT GOING TO SET 
BR 19$ 
OABTST: 
MYSTIC: 
MOV @RHCS1,CS1 SAVE RHCS1 
MOV @RHWC , WC ‘SAVE WORD COUNT 
MOV.  @RHBA. + SAVE Bus ADDRESS 
TST R1 ‘IS IT AN RH11 
BEQ 87$ ‘NO inte. A RY 
CLR BAE CLEAR BAE 
CLR cCs3 ;CLEAR CS3 
JMP 86$ TINUE 
87$: MOV @RHBAE ,BAE ‘SAVE BUS ADDRESS EXTENSION 
MOV @RHCS3.CS3 SSAVE RHCS3 
86$: MOV @RHCS2,CS2 SSAVE CS2 
MOV @RHST,DS1 ‘SAVE TESTER STATUS 
MOV @RHER.ER1 SSAVE ERROR REGISTER 
MOV @RHTDB, TDR SSAVE TESTER DATA REG. 
MOV @RHMR2. TC SSAVE MR2 TESTER REG. 
BIT #OR , @RHCS2 ‘1S OUTPUT READY SET 
BNE 2$ :YES 
ERROR 41 ‘OUTPUT READY DID NOT SET 
2$: MOV @RHDB , DB ‘SAVE CONTENTS OF REGISTER 
CMP $REGO,DB TARE CORRECT B 
BEQ ERR11 ‘WAS THERE AN 
V DB, $TMP1 ‘SETUP FOR WAT! : 
ERROR 4 ‘CORRECT BITS ARE NOT SET 
JSR R7,WATBIT *60 TO WATBIT 
ERR11: JSR R7.CLEER =CLEAR ERRORS 
JSR R7.ERRTST 
FARRER KEKE EERE REE EERE EE 
<STEST 16 RHWC OPERATIONAL TEST 
:*THIS TEST CHECKS THAT WHEN THE WORD COUNT 
S*REGISTER IS INCREMENTED IT IS CARRYED TO THE 
:*HIGHEST BIT AND IS RETURNED TO ZERO 
"ovr gga me aaa acacia ie amma oeleaatatan be etecrat 
TST16: SCOPE 
MOV #~1 ,ARHWC :SETUP FOR 1 WORD 
MOV #7,,aRHCS2 :SETUP UNIT 7 
TST R1 Z1S_1T AN RH11 
BMI 1$ = YES 
MOV #7ERO, @RHBAE ‘SETUP BUS ADDRESS EXTENSION 
1$: MOV #STMPS, @RHBA ‘SETUP BUS ADDRESS 
MOV RITES, @RHCS1 
CLR BITCNT :CLEAR BIT COUNTER 
18$: BIT ARDY, ARHCS1 tIS RDY SET 
BNE 6$ ‘BIT IS SET 


SEQ 0056 
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OPERATIONAL TEST SEQ 0057 


2928 014550 005237 003446 INC BITCNT ; COUNT UP 
2929 014554 001371 BNE 18$ ;NOT FINISHED COUNTING 
2930 014556 005037 003446 _ CLR BITCNT ;GET READY TO DO IT AGAIN 
2931 014562 032777 000200 166540 19%: BIT #RDY ,@RHCS1 31S IT SET YET? 
2932 014570 001004 BNE 6$ 7YES 
2933 014572 005237 003446 INC BITCNT ; COUNT UP 
2934 014576 001401 BEQ 6$ ;BIT IS NOT GOING TO SET 
2935 014600 000770 BR 19$ 

36 014602 6$: 


29 
2937 014602 017737 003420 MOV @RHCS1,CS1 + SAVE RHCS1 
2938 3444 HW , WC WOR 


0001 014660 ; INUE 
2945 014644 017737 166510 003416 87$: MOV @RHBAE ,BAE [SAVE BUS ADDRESS EXTENSION 
2946 014652 017737 166504 003424 MOV @RHCS3,CS3 7SAVE RHCS3 
2947 014660 017737 166454 003422 86$: MOV @RHCS2,CS2 iSAVE CS2 
2948 014666 017737 166450 003432 MOV @RHST ,DS1 TSAVE TESTER STATUS 
2949 014674 017737 166444 003436 MOV @RHER ,ER1 7SAVE ERROR REGISTER 
2950 014702 017737 166442 003442 MOV @RHTDB, TDR ZSAVE TESTER DATA REG. 
2951 014710 017737 166422 003440 MOV @RHMR2 , TC ;SAVE MR2 TESTER REG. 
2952 014716 032777 000200 166404 BIT ARDY ,@RHCS1 :IS READY SET 
2953 014724 001007 BNE 2$ ; YES 
2954 014726 005777 166400 TST @RHWC ; DOE S wC=0 
2955 914732 001425 BEQ 3$ YES 
2956 014734 022777 177777 166370 CMP #~1 , ARHWC Ts IT EQUAL TO OLD 
2957 014742 001410 BEQ 4$ :YES,SEE IF DATA WAS WRITTEN 
2958 014744 005777 166362 2$: TST @RHWC ;DID WC INCREMENT ? 
2959 014750 001435 BEQ 8$ :YES,EXIT TEST 


014752 005037 001162 CLR 7 = SETUP GOOD DATA 


2962 014760 004737 007260 JSR 7 ,WHYFO ARE ANY ERROR BITS SET 

2963 014764 023777 001204 166356 4$: CMP SThPS. @RHTDB z:WAS INFO WRITTEN TO TESTER 
2964 014772 001414 BEQ 5$ INFO WAS WRITTEN TO TESTER 
2965 014774 005037 001162 CLR $REGO ;SETUP GOOD DATA 

2966 015000 104123 ERROR 123 [WRITE OPERATION DID NOT WORK 
2967 015002 000137 015044 JMP 8$ RH DID NOT START OPERATION 
2968 015006 023777 001204 166334 3$: CMP $TMP3,ARHTDB 

2969 015014 001010 BNE 7$ 


2970 015016 104102 ERROR 102 ;RDY BIT NOT SET 


2971 ; INFORMATION WAS WRITTEN TO TEST DB 
2972 015020 000137 015044 JMP &$ 

2973 015024 005037 001162 5$: CLR $REGO SETUP GOOD DATA 

2974 015030 104103 ERROR 103 :DURING A WRITE OPERATION RDY 
2975 :DID NOT SET, WC DID NOT INCREMENT 
2976 ;BUT CORRECT INFO DID GET WRITTEN 
2977 :TO TESTER 

sor8 015032 000137 015044 JMP 8$ 

2980 015036 104104 7$: ERROR 104 :RDY BIT DID NOT SET AFTER 

2981 zA WRITE OPERATION, WC WAS INC 
2982 zAND_INF WAS NOT WRITTEN TO 


2983 i TESTER 


MASSBUS RH70 AND RH11_DIAGNOSTIC 


CZRHBF P11 


SSseseses 
ONAUSWN-oO 


3019 
20 


015040 
015044 
015050 


015054 
015056 


015064 
01 


015330 


26-JUL-79 
004737 
004737 
004737 


000004 
012737 


10:13 

007260 
006626 
050244 
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000037 
177776 
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000461 
000061 


003446 
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001212 
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T16 RHWC OPERATIONAL TEST 


JSR R7,WHYFO 
8$: JSR R7,CLEER CLEAR ERRORS 
JSR R7,ERRTST WAS THER ANY ERRORS 


DISA IOIISIIOIISISISIIDISISISIOIIOIIIIOIIOIOIIOIOIOIIDIIDIOIISIDISDIIIIIOIIOIIN OE Ett 
i*TEST 17 RHBA OPERATIONAL TEST 

:*THIS TEST CHECKS THAT La BUS ADDRESS REGISTER 

;*WILL CARRY THROUGH TO THE HIGHEST BIT 

;*IN THE BUS ADDRESS EXTENSION REGISTER OR BIT Al7 

:*IN THE RHCS1 REGISTER AFTER IT IS INCREMENTED 


. > ETT TTTTTT TTT TTT TTT TE TITTLE TITTLE LIT TTT TTT TTT 


WAS AN ERROR SET 


TST17: SCOPE 
MOV 


#1, STIMES ::D0 1 ITERATION 

TST R1 z1S IT AN 11 OR A 70 

BM! 1$ ‘IT'S AN RH11 

MOV #37, @RHBAE ‘SETUP B SAE IN RH70 
1$: MOV #177776, @RHBA *SETUP BA 

MOV #-1,aRHWC ‘SETUP WORD COUNT 

TST R1 :1$_1T A RH70 

BEQ 34$ YES 

MOV #A16!WRITEO,@RHCS1 [TELL IT TO WRITE 

BR $ *SKIP OVER 70 CODE 
348: MOVB  #WRITEO,@RHCS1 [TELL IT TO WRITE 

CLR BITCNT ZCLEAR BIT COUNTER 
18$: BIT ARDY ,ARHCS1 :1S RDY SET 

BNE :BIT Is SET 

INC BITCNT T UP 

BNE 18$ ‘NOT FINISHED COUNTING 

CLR BITCNT [GET READY TO DO IT AGAIN 
19$: BIT ARDY, @RHCS1 ‘IS IT SET YET? 

BNE $ YES 

INC BITCNT *COUNT UP 

BEQ 2$ ‘BIT 1S NOT GOING TO SET 
1 BR 19$ 

MOV @RHCS1,CS1 zSAVE RHCS1 

MOV @RHWC, WC :SAVE WORD COUN 

MOV @RHBA, :SAVE BUS ADDRESS 

TST R1 ‘IS IT AN RH1 

BEQ 87$ “NO IT'S A 70 

CLR BAE ; CLEAR 

CLR CS3 =CLEAR CS3 

JMP 86$ > CONT INUE 
87$: MOV @RHBAE ,BAE + SAVE BUS ADDRESS EXTENSION 

MOV @RHCS3,CS3 :SAVE RHCS3 
86$: MOV @RHCS2,CS2 VE CS2 

MOV @RHST,DS1 «SAVE TESTER STATUS 

MOV @RHER,ER1 :SAVE ERROR REGISTER 

MOV @RHTDB, TDR :SAVE TESTER DATA REG. 

MOV @RHMR2, TC sSAVE MR2 TESTER REG. 

TST R1 ‘IS IT AN 11 OR A 70 

BEQ 12$ “DO RH70 PART OF TEST 

BIT #A17,@RHCS1 ‘DID A17 GET SET 

BNE 4$ YES 


SEQ 0058 


MASSBUS_RH70 AND RH11 Saris | 


CZRHBF .P11 26-JUL-79 1 


01 


lelelelelelelelelo) 
ad at had od oad a od od od 


Satobe 
23333 


003 
015454 104111 
015456 137 


0155 3 
015502 104076 
015504 000137 
015510 104113 
015512 004737 
015516 004737 


000004 

015524 005701 
001404 

015530 013777 
36 000403 


915540 012777 
005701 


015444 
000040 


000037 
165776 
007260 
015462 
165732 
007260 
015512 
007260 
015512 
015512 


015512 
000400 


015512 
165646 


015512 


015512 


006626 
050244 


003362 


177702 
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117 RHBA 


OPERATIONAL TEST SEQ 0059 
JMP 5$ ;CONT. FOR RH11 
166014 128: CMP #40 , @RHBAE :DID BAE INC 
BEQ 4$ s;BAE_ INCREMENTED 
166004 CMP #37 , @RHBAE 1S _BAE OLD VALUE 
BEQ 3$ ;BAE DID NOT INCREMENT 
TST @RHBAE :1S_BAE ZERO 
BEQ 9$ sBAE IS ZERO 
ERROR 105 ;BAE GOT MESSED UP DOING A WRITE 
yo ——* DID AN ERROR OTHER THAN NEM CAVSIT 
4$: TST @RHBA DID BA INCREMENT ? 
BEQ 8$ ;YES ,EXIT TEST 
ERROR 112 [BA DID NOT INCREMENT 
JSR R7,WHYFO WAS _AN ERROR BIT SET 
JMP 8$ EXIT TEST 
3$: ERROR 106 ZBAE DID NOT INCREMENT 
JSR R7,WHYFO WAS AN ERROR BIT SET 
JMP 8$ ZEXIT TEST 
6$: ERROR 107 ;BAE INCREMENTED OK BUT A17 + 
3A16_ DID NOT INC PROPERLY IN RHCS1 
JMP 8$ SEXIT TEST 
9$: ERROR 110 ;RHBAE IS ZERO 
JMP 8$ 3;B1T 5_IN BAE SHOULD BE SET 
165656 5$: BIT A16,@RHCS1 71S A 16 SET 
BNE——__ 10$ :YES, BA DID NOT INCREMENT 
ERROR = 111 —~_ 3A17 DID NOT SET WHEN BA WAS 
Ue : INC 
JMP 8$ ~~ SEXIT TEST 
10$: TST @RHBA :DOES =0 
BEQ 11$ YES, BA INCREMENTED 
ERROR 112 BA DID NOT INCREMENT 
JMP 8$ EXIT TEST 
11$: TST R1 71S IT A 70 OR 11 
BMI 13$ :GO TO CORRECT ERROR 
ERROR 76 :BA ge yo ang BUT DID NOT 
3 TO BAE 
JMP 8$ GET Rout OF TEST 
13$: ERROR 113 BA INCREMENTED BUT IT DID NOT 
CARRY OVER TO Al7 + Al6 
8$: JSR R7,CLEER [CLEAR ERRORS 
JSR R7,ERRTST sWAS THERE ANY ERRORS 
CLARA AEE EKEKKEEKEKEKEKEEEKEEKEEEEEEEREKEEKEEEEEEKEE EE 
:*TEST 20 NEM,TRE,SC BIT TEST 
s*THIS TEST WILL CHECK THAT NON EXISTING MEMORY 
:*WILL SET THE TRE AND SC BIT IN RHCS1 REGISTER 
CARRERE EKER 
TST20: SCOPE 
TST R1 
BEQ 40$ 
165576 MOV RHCS3,@RHBA 
BR 41$ 
165566 40$: MOV #177702, @RHBA SET UP BUS ADDRESS 
41$: TST R1 31S 17 AN RH7 
BM] 9$ NO SKiP RH11 PORTION 


1.5 
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CZRHBF.P11 = 26=JUL=79 10:13 T20 NEM, TRE,SC BIT TEST SEQ 0060 
30% 015552 012777 000077 165600 MOV #77 , @RHBAE ;SET UP BAE REGISTER 
3097 015560 012777 177777 165544 9S: MOV #=1, ARHWC [SET WORD COUNT TO ONE WORD 
3098 015566 912777 000007 165544 MOV #7 ,@RHCS2 ;SET UNIT NUMBER 
3099. 015574 012777 001471 165526 MOV WAI6!A17!READO,@RHCS1 TELL IT TO READ 
3100 015602 005037 003446 CLR BITCNT SCLEAR BIT COUNTER 
3101 015606 032777 000200 165514 18$: BIT #RDY ,@RHCS1 1S _RDY 
3102 015614 001015 BNE DELTA BIT IS SET 
3103 015616 005237 003446 INC BITCNT COUNT UP 
3104 015622 001371 BNE 18$ NOT FINISHED COUNTING 
3105 015624 005037 003446 CLR BITCNT :GET READY TO DO IT AGAIN 
3106 015630 032777 000200 165472 19$: BIT #RDY ,@RHCS1 :IS IT SET YET? 

3107 015636 001004 BNE DELTA ZYES 

3108 015640 005237 003446 INC BITCNT [COUNT UP 

3109 015644 001401 BEQ DELTA , BIT IS NOT GOING TO SET 
3110 015646 19$ 

3111 015650 DELTA: 

3112 015650 017737 165464 003422 MOV @RHCS2,CS2 SAVE CONTENTS OF RHCS2 
3113 015656 017737 165446 001162 MOV @RHCS1 , $REGO SET UP NEEDED BITS ONLY 
3114 015664 042737 027777 001162 BIC #GO!TE'RDY!A16!A17!PSEL !DVA!MCPE !READ6, SREGO 
3115 7CLEAR BITS NOT NEEDED 
3116 015672 017737 165432 003420 MOV @RHCS1,CS1 TSAVE RHCS1 

3117 015700 017737 165426 003444 MOV @RHWC , WC SAVE WORD COUNT 

3118 015706 017737 165422 003414 MOV @RHBA BA SAVE BUS ADDRESS 

3119 015714 005701 TST R1 :1S IT AN RH11 

3120 015716 001406 BEQ 87$ NO IT £7. A 70 

3121 015720 005037 003416 CLR BAE ZCLEAR BAE 

3122 015724 005037 003424 CLR o: Oe ZCLEAR CS3 

3123 015730 000137 015750 JMP 86$ > CONT INUE 

3124 015734 017737 165420 003416 87$: MOV @RHBAE , BAE TSAVE BUS ADDRESS EXTENSION 
3125 015742 017737 165414 003424 MOV @RHCS3,CS3 SAVE RHCS3 

3126 015750 017737 165364 003422 86$: MOV @RHCS2,CS2 SAVE CS 

3127 015756 017737 165360 003432 MOV @RHST,DS1 TSAVE TESTER STATUS 
3128 015764 017737 165354 003436 MOV @RHER,ER1 TSAVE ERROR REGISTER 
3129 015772 017737 165352 003442 MOV @RHTDB, TDR TSAVE TESTER DATA REG. 
3130 016000 017737 165332 003440 MOV @RHMR2 , TC >SAVE MR2 TESTER REG. 
3131 016006 032777 000200 165314 BIT #RDY , @RHCS1 1S READY 

3132 016014 001003 : BNE 99$ :YES CONTINUE TEST 

3133 016016 104102 ERROR 102 ZREADY NOT SET 

3134 016020 004737 007260 JSR R7,WHYFO TANY ERRORS SET 

3135 016024 032777 004000 165306 99$: BIT #NEM , @RHCS2 1S NEM 

3136 016032 001016 BNE 1$ TYES CHECK TRE AND SC 
3137 016034 022737 140000 001162 CMP #SC! TRE, $REGO 1S THE SC AND TRE BITS SET 
3138 016042 001460 BEQ :YES NEM IS_IN ERROR 
3139 016044 032737 040000 001162 BIT #TRE , SREGO :1S JUST THE TRE BIT SET 
3140 016052 001060 BNE :TRE BIT MUST BE_IN ERROR 
3141 016054 032737 100000 001162 BIT WSC. $REGO 31S JUST THE SC BIT SET 
3142 016062 001060 BNE 4$ :SC BIT SET ERRONIOUSLY 
3143 016064 104005 ERROR 5 NEM NOT SET IN RHCS2 
3144 016066 000467 BR 8$ :SET UP TO TEST AGAIN 
3145 016070 022737 140000 001162 15: CMP #SC! TRE, SREGO SIS SC AND TRE SET 

3146 016076 001030 BNE 22$ ;FIND THE ERROR 

3147 016100 012737 020000 004124 MOV #MCPE ,$CS1 TEST FOR SHORTS 
3148 016106 012737 173400 004126 MOV #MPE |MXF ' PGE !NED!UPE !WCE !DLT.$CS2 

3149 016114 012737 174000 004130 MOV #WCELO!WCEHI 'DPELO! DPEHI ‘APE .$CS3 

3150 016122 012737 000000 004132 MOV #0, $ST 

3151 016130 012737 030175 004134 MOV #1LF 'RMR! CPE! DPE! RMBEX!RFAIL!DTE!OP1,$ER 
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T20 -TRE,SC BIT TEST 


MOV #-1 ,BEF ORE ;TELL WHYFO ITS FOR SHORTS 


JSR R7 ,WHYFO TEST FOR SHORTS 
CLR BEF ORE SWE HAVE CHECKED FOR SHORTS 
JMP 8$ LEAVE THE TEST 
22$: BIT ATRE , SREGO * THEN IS THE TRE BIT SET 
BNE 6$ :SC BIT DID NOT SEE TRE BIT 
BIT #SC ,$REGO 71S THE SC BIT SET 
BNE 7$ TRE HAS AN OPEN GOING TO BUS 
ERROR 6 zTRE SET LOGIC NOT WORKING 
BR 8$ SET UP TO TEST AGAIN 
2$: ERROR 7 7NEM HAS OPEN IN LINE GOING TO BUS 
JSR R7,WHYFO SEE IF ANY ee te ERROR BIT IS 
7SET OTHER THAN NEM 
BR 8$ :SET UP TO Test AGAIN 
3$: ERROR 10 ;SOMTHING WRONG WITH TRE BIT 
JSR R7 ,WHYFO 7SEE_IF AN ERROR BIT IS ow 
[OR BOTH NEM IN RHCS2 AND SC_IN 
‘ ;RHCS1 HAS AN OPEN BETUEN. IT AND THE BUS 
BR 8$ :SET UP TO TEST AGAIN 
4$: ERROR 11 7SC BIT oar SET BY EITHER ATTN OR 
JSR R7 ,WHYFO FIND WHAT ERROR BIT IS SET 
zMCPE ERROR OR SC IS SHORTED TO +5 VOLTS 
BR 8$ 4 a TO TEST AGAIN 
6$: ERROR i2 TRE WAS SET BY OTHER THAN NEM 
JSR R7,WHYFO ;FIND ERROR BIT THAT SET TRE 
BR 8$ :SETUP TO TEST AGAIN 
7$: ERROR 13 7TRE HAS AN OPEN GOING TO THE BUS 
8$: BIT #SW14!SW9!SW8,a4177570 ;ANY LOOPING BEE ONE 
BNE 21$ :YES, LOAD TRE NO MATTER WHAT 
TSTB SERFLG WAS THERE AN ERROR 
BNE 9$ ;SKIP La CHECK 
21$: MOVB #TREB, @RHCS1B TRE 
BIT #NEM, @RHCS2 ‘DID ERROR 5 ae 
BEQ 9$ :YES exit TEST 
ERROR 50 LOADING TRE DID NOT CLEAR ERROR 
9$: JSR R7,CLEER ‘SEE IF ERRORS ARE CLEARED sine 


JSR R7,ERRTST 


IOC ISIS UISIIOIIOISIOIDIOISIOIDIOIOIOIOIIOIOIOIOIISIOIOIIOIIIOIDIOIOIIIDIOIOIIOIIOII IOI IO 
TRTEST 21 WCE,TRE,SC BIT TEST 

:*THIS TEST WILL CHECK THAT TRE AND SC SET 

;*WHEN A WRITE CHECK ERROR OCCURS (WCE) 


DSA EO IOUS ODI IIDIIISIOIUIUISISIIOISISI IIIA IOS OOO I Ot 


TST21: SCOPE 
MOV #~-1 ,ARHWC ONE WORD TRANSFER 
MOV #7 ,ARHCS2 :TO UNIT ONE 
TST R1 71S IT AN RH70 
BNE 9$ ZNO. 
MOV #ZERO, @RHBAE SETUP RHBAE REGISTER 
9$: MOV #SREG4 , @RHBA SETUP BUS ADDRESS 
MOV #AB , SREG4 [CREATE INFORMATION 
MOV #WRITEO,@RHCS1 TELL IT TO WRITE 
CLR BITCNT :CLEAR BIT COUNTER 
i8$: BIT ARDY ,@RHCS1 :1S_RDY SET 


BNE WCETST :BIT IS SET 


SEQ 0061 


MASSBUS RH70 AND 


CZRHBF .P11 


33 
: 


CII 


aes 


3262 
3263 016714 


OBNAARWN=O 
° 
— 
g 
oe] 


001004 
005237 003446 


6644 017737 164470 
3255 016652 017737 164452 
56 6660 042737 027777 


017737 


RH11_DIAGNOSTIC 
26-JUL-79 10:13 


005237 003446 
016410 005037 003446 
006200 


164706 


164676 


164656 
164634 


164612 


164476 
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INC BITCNT ; COUNT UP 
BNE 18$ SNOT FINISHED COUNTING 
CLR BITCNT ;GET READY TO DO IT AGAIN 
19$: BIT ARDY ,@RHCS1 eS IT SET YET? 
WCETST 7Y YES" 
INC BITCNT ;COUNT UP 
BEQ WCETST ‘BIT IS NOT GOING TO SET 
BR 19$ 
WCETST: 
BIS #40, @RHCSZ ;DO A CONTROLER CLEAR 
CLR BITCNT ;SET UP FOR DELAY 
17$: INC BITCNT ;COUNT UP 
BNE 17$ 
MOV a7, @RHCS2 sSELECT UNIT # 
CLR BITCNT ;CLEAR BIT COUNTER 
18$: BIT #RDY ,@RHCS1 :IS RDY SET 
BNE WCTST :BIT IS SET 
INC BITCNT ;COUNT UP 
BNE 18$ “NOT FINISHED COUNTING 
CLR BITCNT ;GET READY TO ge IT AGAIN 
19$: BIT #RDY ,@RHCS1 eS IT SET YET? 
BNE WCTST -YES 
INC BITCNT :COUNT UP 
BEQ wise :BIT IS NOT GOING TO SET 
WCTST: 
BIT he @RHCS1 > Rea SET 
ERROR 102 SREADY NOT SET 
JSR R7, WHYFO ANY ERRORS SET 
20$: MOV #-1 , @RHWC sRESET WORD COUNT 
MOV #SREG4 , @RHBA sRESET BUS ADDRESS 
MOV #OAB , SREGS sCREATE WRITE CHECK ERROR 
MOV #WRCHO,@RHCS1 “MAKE THE ERROR 
CLR BITCNT CLEAR BIT COUNTER 
18$: BIT #RDY ,@RHCS1 RDY SET 
WCETRE ‘BIT IS SET 
INC BITCNT ; COUNT UP 
BNE 18$ “NOT FINISHED COUNTI 
CLR BITCNT 3GET a 34 TO dO IT AGAIN 
19$: BIT ARDY ,A@RHCS1 1S IT SET YET? 
BNE WCE TRE 7YES 
INC BITCNT ; COUNT UP 
BEQ WES TRE ;BIT IS NOT GOING TO SET 
WCETRE: 
MOV @RHCS2,CS2 ;SAVE CONTENTS 
MOV @RHCS1,$REGO SET UP NEEDED BITS ONLY 
BIC #GO!IE!RDY: A16!A17!PSEL !DVA!MCPE !READ6, $REGO 
;CLEAR BITS NOT NEEDED 
MOV @RHCS1,CS1 + SAVE csi 
MOV @RHWC ,WC :SAVE WORD COUNT 
MOV @RHBA ,BA + SAVE BUS ADDRESS 
TST R1 ;IS IT AN RH11 
BEQ 87$ *NO IT'S A 70 


WCE, TRE,SC BIT TEST 


CLR BAE CLEAR BAE 


SEQ 0062 
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CZRHBF P11 26-JUL-79 10:13 T21 WCE, TRE,SC BIT TEST SEQ 0063 
6720 005037 003424 CLR CS3 sCLEAR CS3 
3265 016724 000137 016744 JMP 86$ : CONTINUE 
67 017737 164424 003416 87$: MOV @RHBAE ,BAE 7SAVE BUS ADDRESS EXTENSION 
3267 6736 017737 164420 003424 MOV @RHCS3,CS3 7SAVE RHCS3 
016744 017737 164370 003422 86$: MOV @RHCS2,CS2 TSAVE CS2 
3269 016752 017737 164364 003432 MOV @RHST ,DS1 ; SAVE TESTER STATUS 
016760 017737 164360 003436 MOV @RHER ,ER1 VE ERROR REGISTER 
3271 016766 017737 164356 003442 MOV @RHTDB, TOR SAVE TESTER DATA REG. 
016774 017737 164336 003440 MOV @RHMR2 , TC SAVE MR2 TESTER REG. 
7002 777 000200 164320 BIT ARDY ,@RHCS1 71S READY SET 
3274 017010 001003 BNE 99$ YES CONTINUE TEST 
3275 017012 104102 ERROR 102 RE 
3276 017014 004737 007260 JSR R7 ,WHYFO sANY ERRORS SET 
3277 017020 032777 040000 164312 99S: BIT MWCE ,ARHCS2 : 
3278 017026 001016 BNE 1 :YES_CHECK TRE AND SC 
3279 017030 022737 140000 001162 CMP . #SC! TRE, $REGO 71S THE SC = TRE BITS SET 
3280 017036 001460 BEQ 2$ YES WCE IS IN ERROR 
3281 017040 032737 040000 001162 BIT #TRE ,SREGO 31S JUST THE TRE BIT SET 
3282 017046 001060 . BNE $ ;TRE BIT MUST BE IN ERROR 
3283 017050 032737 100000 001162 BIT #SC,$REGO 71S JUST THE SC BIT SET 
3284 017056 001060 BNE 4$ :SC_BIT SET ERRONIOUSLY 
3285 017060 104014 ERROR 14 WCE NOT SET IN RHCS2 
3286 017062 000467 BR 8$ SET UP TO TEST AGAIN 
3287 017064 022737 140000 001162 1$: CMP MSC! TRE ,$REGO 21S SC_AND TRE SET 
3288 017072 001030 BNE 228 zFIND THE ERROR 
3289 017074 012737 020000 004124 MOV #MCPE ,$CS1 ;TEST FOR SHORTS 
3290 017102 012737 137400 004126 MOV WMPE | MXF ! PGE !NEM!NED!UPE! DLT, $CS2 
3291 017110 012737 160000 004130 MOV #DPELO! DPEHI ! APE ,$CS3 
3292 017116 013737 004132 004132 MOV ST, 
3293 017124 013737 004134 004134 MOV SER, SER 
017132 012737 177777 004122 MOV #-1 ,BEF ORE TELL WHYFO ITS FOR SHORTS 
3295 017140 004737 007260 JSR R7 ,WHYFO : TEST FOR SHORTS 
017144 005037 CLR BEF ORE WE HAVE CHECKED FOR SHORTS 
3297 017150 000137 017242 JMP 8$ LEAVE THE TEST 
017154 032737 040000 001162 22$: BIT ATRE ,SREGO THEN IS THE TRE BIT SET 
017162 001022 BNE 6$ :SC BIT DID NOT SEE TRE BIT 
3300 017164 0327357 100000 001162 BIT #SC,$REGO 335 THE SC BIT SET 
3301 017172 001022 BNE 7$ TRE HAS AN OPEN GOING TO BUS 
3302 017174 104006 ERROR 6 ;TRE SET LOGIC NOT WORKING 
3303 017176 000421 BR 8$ 7SET UP TO TEST AGAIN 
3304 017200 104015 2$: ERROR 15 ;WCE HAS OPEN IN LINE GOING TO BUS 
3305 017202 004737 007260 JSR R7 ,WHYFO SEE IF ANY OTHER ERROR BIT IS 
3306 [SET OTHER THAN WCE 
3307 017206 000415 BR 8$ SET _UP TO TEST AGAIN 
3308 017210 104016 3$: ERROR 16 2 SOMTHING WRONG WITH TRE BIT 
3309 017212 004737 007260 JSR R7,WHYFO 7SEE_IF AN ERROR BIT IS SET 
3310 OR BOTH WCE IN RHCS2 AND SC _ IN 
3311 7RHCS1 HAS AN ve BETWEEN IT AND THE BUS 
3312 017216 000411 BR 8$ :SET - TEST AGAIN 
3313 017220 104011 4$: ERROR 11 :SC BIT WAS SET BY EITHER ATTN OR 
3314 017222 004737 007260 JSR R7,WHYFO FIND WHAT ERROR BIT SET 
3315 zMCPE_ERROR * SC IS SHORTED TO +5 VOLTS 
3316 017226 000405 BR 8$ Ser TO TEST AGAIN 
3317 017230 104017 6$: ERROR 17 TRE WAS SET BY OTHER THAN WCE 


3318 017232 004737 007260 JSR R7,WHYFO FIND ERROR BIT THAT SET TRE 
3319 017236 000401 BR 8$ ‘SETUP TO TEST AGAIN 
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017240 7$: 13 ;TRE HAS AN OPEN ee TO THE BUS 
041400 177570 8$: #SW14!SW9!SW8,a4177570 ANY LOOPING BEEING D 
BNE :YES,LOAD TRE NO MATTER. WHAT 
001103 oe leas R ERROR 


[WAS THERE AN 
: SKIP i CHECK 
000100 164076 : #TREB,@RHCS1B TRE 
040000 164044 MWCE ,@RHCS2 :DID ERROR Ss 
BEQ 9$ 2 YES EXIT TEST 
50 ;LOADING TRE DID NOT CLEAR ERROR 
006626 9$: R7,CLEER SEE IF ERRORS ARE CLEARED 
050244 R7,ERRTST 


J LAA REREREEEKEKREEEKREREREREEEEEREREREEREERERRERRE 
S*TEST 22 MDPE ,TRE AND SC BIT TEST 
;*THIS_ TEST CHECKS THAT MDPE CAN N BE SET IN 
:*RHCS2,AND THAT MDPE SETS TRE AND SC 
:*IN THE RHCS1 REGISTER 
4 JHE USES IIIS UDI O ISIS SIO IDOE ODITIEII TODDS INI EI 
017310 000004 18122: 
000007 #7 ,ARHCS2 :SET UNIT 
177774 #-i,, @RHWC SET UP WORD COUNT 
R1 [1S IT AN RH70 
9$ NO ITS AN RH11 
#ZERO, @RHBAE UP BAE REGISTER 
HBA RESS 
WREADO, @RHCS1 
#PAT!7.@RHCS2 
@RHCS2.CS2 : ONTENT 
BITCNT [CLEAR BIT COUNTER 
163726 : ARDY ,@RHCS1 SIS RDY SET 
BNE UPE TRE ‘BIT IS SET 
BITCNT 
18$ 


: COUNT UP 

NOT FINISHED COUNTING 

BITCNT :GET READY TO DO IT AGAIN 

#RDY ,@RHCS1 zIS_IT SET YET? 

UPE TRE 7 YES 

BITCNT : COUNT UP 

UPE TRE :BIT IS NOT GOING TO SET 

19$ 

@RHCS1 , SREGO SET UP NEEDED BITS ONLY 

#GO! TE'RDY'A16!A17!PSEL !DVA!MCPE !READ6, SREGO 
CLEAR BITS NOT NEEDED 

@RHCS1,CS1 VE RHCS1 

@RHWC , WC 


3 INUE 
7SAVE BUS ADDRESS EXTENSION 
;SAVE RHCS3 


sSAVE CS2 
163600 ST,DS1 7SAVE TESTER STATUS 
017737 163574 @RHER.ER1 SAVE ERROR REGISTER 
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017737 @RHTDB, TOR zSAVE TESTER . “> eg 
Orr 37 @RHMR2 , TC ;SAVE MR2 TESTER 
0 #RDY ,@RHCS1 71S READY SET 
99$ ZYES CONTINUE TEST 
102 ;READY NOT SET 
R7 ,WHYFO zANY ERRORS SET 
#MPE , ARHCS2 21S MPE SET 
YES CHECK TRE 


$ AND SC 
WSC! TRE, SREGO SIS THE SC AND TRE BITS SET 
$ [YES MPE IS IN ERROR 
#TRE , SREGO ‘I$ JUST THE TRE BIT SET 
#SC,$REGO 
4$ 
116 
8$ 
#SC! TRE, SREGO 
2$ 
$(S1,$CS1 
#MXF |PGE '!NEM!NED! UPE ! WCE! DLT r.scsh 
#WCELO!'WCEHI !DPELO! DPEHI ‘APE. $CS3 
$ST,$ST 
;TELL WHYFO ITS FOR SHORTS 
‘TEST FOR SHORT 
SWE HAVE CHECKED FOR SHORTS 
ZLEAVE THE TEST 
#TRE , SREGO [THEN IS THE TRE BIT SET 
:SC BIT DID NOT SEE TRE BIT 
#SC,$REGO tI1S THE SC BIT SET 
7$ ‘TRE HAS AN OPEN GOING TO BUS 
ie SET LOGIC NOT WORKING 


TO TEST AGAIN 
120 HAS OPEN _IN LINE — TO BUS 
R7 ,WHYFO 7 SEE IF ANY oe learns BIT IS 


121 
R7 ,WHYFO 


8$ 
11 
R7 ,WHYFO 


Sa Ss 


EEEREKEE EES 
Soo NQAMUESWN—O 


122 ;TRE WAS SE OTHER THAN MPE 
R7 ,WHYFO ;FIND ERROR BIT THAT SET TRE 
8$ ; SETUP eS TEST AGAIN 
RE HAS AN Oe aren TO THE BUS 


: 13 
177570 : IT outs 'SW9! Sw8,a4177570 
SERFLG 


BNE 
163312 : MOVB #TREB, @RHCS1B LOAD TRE 
163260 #MPE , ARHCS2 7DID ERROR CLEAR 


E AN 
SKIP TRE CHECK 
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020060 001401 BEQ 9$ :YES i TEST 

020062 104050 ERROR 50 sLOADING TRE DID NOT CLEAR ERROR 
020064 004737 006626 9$: JSR R7,CLEER SEE IF ERRORS ARE CLEARED 
020070 004737 050244 JSR R7,ERRTST 


a at Ge af eae teat imate 
TRTEST 23 UPE,TRE,SC ERROR TEST (RH11) 

7*THIS TEST CHECKS THE UPE BIT IN RHCS2 

:*TO SEE IF IT SETS AND WHEN IT SETS IS 

;*TRE AND SC BITS SET IN RHCS1 
Tsar = paceman Pe an ee gn nee 


000004 TST23: 
012777 000007 163234 MOV ay USS 


; RH11 
FITIT ; RH11,D0 THE ut i 
020560 J FIT ; 70, EXIT TEST 
020007 163216 : MUPE !7,A@RHCS2 ; Y ERROR IN RH11°S CS2 REG 
163202 62 MO @RHCS1, $REGO ;SE S ONLY 
027777 #GO!TEIRDY!A16!A17!PSEL !DVA! 


CLE 
@RHCS1,CS1 ; SAVE 
@RHWC , WC 


: CONTINUE 
SAVE BUS ADDRESS EXTENSION 
3SAVE RHCS3 

SAVE CS2 

;SAVE canon he STATUS 


SAVE ERROR REGISTER 
: SAVE TESTER DATA “+ Ng 
SAVE MR2 TESTER REG 


003440 
163050 
TANY ERRORS SET 
163042 1S UPE SET 
BNE SYES CHECK TRE AND SC 
001162 #SCi TRE, $REGO t1S THE SC AND TRE BITS SET 
: IN ERROR 
001162 #TRE, SREGO 
BNE $ 
001162 WSC, $REGO 
4$ 
20 
8$ 
#SC! TRE, $REGO 
22$ : 
$CS1,$CS1 “TEST FOR SHORTS 
WMP 'MXE LPGE !NEM!NED!WCE !DLT, ,$CS2 


004130 $CS3.$CS 
013737 $ST, $s} 
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CZRHBF P11 26-JUL-79 10:1 T23 UPE,TRE,SC ERROR TEST (RH11) SEQ 0067 
3488 020374 013737 004134 004134 MOV SER,SER 
3489 020602 012737 177777 004122 MOV #~1 ,BEF ORE ‘TELL awe ITS FOR SHORTS 
020410 004737 007260 JSR R7 ,WHYFO ;TEST FOR SHORTS 
3491 020614 005037 004122 CLR BEF ORE SWE HAVE CHECKED FOR SHORTS 
3492 020420 000137 020512 JMP 8$ SLEAVE THE TEST 
3493 020424 032737 040000 001162 22$: BIT #TRE ,SREGO ; THEN IS THE TRE BIT SET 
3494 0204 001022 BNE 6$ :SC BIT DID NOT SEE TRE BIT 
3495 020434 032737 100000 001162 BIT #SC ,SREGO 71S THE SC BIT SET 
3496 020442 001022 BNE 7$ [TRE HAS AN OPEN GOING TO BUS 
3497 020444 104006 ERROR 6 ; TRE SET LOGIC NOT WORKING 
98 020446 0004621 BR 8$ ;SET UP TO TEST AGAIN 
99 020450 ogit 2$: ERROR 21 ;UPE HAS OPEN IN LINE GOING TO BUS 
3500 020452 004737 007260 JSR R7 ,WHYFO ;SEE IF ANY OTHER ERROR BIT IS 
3501 7SET OTHER THAN UPE e 
3502 020456 0004615 BR 8$ ;SET UP TO TEST AGAIN 
3503 020460 104023 3$: ERROR 23 ;SOMTHING WRONG WITH TRE BIT 
3504 020462 004737 007260 JSR R7,WHYFO ;SEE IF AN ERROR BIT IS SET 
3505 ;0R BOTH UPE IN RHCS2 AND SC IN 
3506 7;RHCS1 HAS AN OPEN BETWEEN IT AND THE BUS 
3507 020466 000411 BR 8$ :SET UP TO TEST AGAIN 
3508 020470 104011 4$: ERROR 11 35 BIT WAS SET BY EITHER ATTN OR 
3509 020472 004737 007260 JSR R7,WHYFO FIND WHAT ERROR BIT I T 
3510 :MCPE ERROR OR SC IS SHORTED TO +5 VOLTS 
3511 020476 000405 BR 8$ :SETUP TO TEST AGAIN 
3512 020500 104022 6$: ERROR 22 TRE WAS SET BY OTHER THAN UPE 
3513 020502 004737 007260 JSR R7,WHYFO [FIND ERROR . bing SET TRE 
3514 020506 000401 BR 8$ :SETUP TO TEST A 
3515 020510 104013 7$: ERROR 13 ;TRE HAS AN OPEN G GOING TO THE BUS 
3516 020512 032737 041400 177570 8$: BIT #SW14!SW9!SW8,a4177570 ANY LOOPING BEEING DONE 
3517 020520 001003 BNE 21$ 7YES,LOAD TRE NO MATTER WHAT 
3518 020522 105737 001103 TSTB SERFLG ;WAS THERE AN ERROR 
3519 020526 001010 BNE 9$ 7SKIP TRE CHECK 
3520 020530 112777 000100 162626 21$: MOVB #TREB,@RHCS1B [LOAD TRE 
3521 020536 032777 020000 162574 BIT MUPE , @RHCS2 :DID ERROR CLEAR 
3522 020544 001401 BEQ 9$ :YES EXIT TEST 
3523 020546 104050 ERROR 50 ;LOADING TRE DID NOT CLEAR ERROR 
3524 020550 004737 006626 9$: JSR R7,CLEER 7SEE IF ERRORS ARE CLEARED 
$252 020554 004737 050244 JSR R7,ERRTST 
3527 020560 FI T? 
528 DORIS III III IIIS IOI III III IOIOIIIIOI IOUS IOI IOI 
529 T*TEST 26 UPE,TRE.SC ERROR TEST (RH70) 
3530 ;*THIS TEST CHECKS THE UPE BIT IN RHCS2 
3531 :*T0 SEE IF IT SETS AND WHEN IT SETS IS 
3532 :*TRE AND SC BITS SET IN RHCS1......... 
3533 ee aren ee 
$23¢ 020560 000004 TST24: SCOPE 
3536 020562 012777 000007 162550 MOV #7 ,A@RHCS2 SETUP UNIT 7 
3537 020570 005701 TST R1 343 if me 
020572 001402 BEQ yoo 31T°S AN RH70 
3539 020574 000137 021342 JMP FANGIE :1T'S AN ag l? EXIT TEST 
3540 020600 012777 162554 PLACE: MOV MIPCK2,@RHCS3 ;SETUP FOR PARITY ERROR 
020606 012777 177776 162516 MOV #=2,, ARHWC SETUP WORD COUNT TO TWO WORDS 
3542 020614 012777 162536 MOV #ZERO, @RHBAE 7SETUP BAE 
012777 162504 #$REGO, aRHBA SETUP ADDRESS 


MASSBUS _RH70 AND RH11_DIAGNOSTIC 
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3544 020630 012777 000061 
3545 020536 005037 003446 
3546 020642 paerte 000200 
e208 020652 005237 003446 


3550 020660 005037 003446 
3551 020664 032777 000200 


004 
3553 020674 005237 003446 
554 700 


704 
3557 020704 017737 162420 
042737 027777 


020720 017737 162404 
162400 
3562 020734 017737 162374 


0004: 
sth 4 140000 


ALkOLWMON 


VANTKSSRR 
oo 
os 
rhe 
WW 
NN 
BER aS 
NN N 
Mme—nnN eS fH 
RNSVENSSR 


Ww 
$ 
oO 
Nm 
= 
ta®) 
Nm 
= 
So 
Nm 
= 


162472 
162460 


162436 
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T24 UPE,TRE,SC ERROR TEST (RH70) 


MOV 1 a tates TELL IT TO WRITE 


CLR BITCN ;CLEAR BIT COUNTER 
18$: BIT #RDY ,@RHCS1 71S RDY SET 
BNE DYNO ;BIT IS SET 
INC BITCNT é T UP 
BNE 18$ ;NOT FINISHED COUNTING 
CLR BITCNT ;GET READY TO DO IT AGAIN 
19$: BIT AMRDY ,@RHCS1 31S IT SET YET? 
BNE DYNO YES 
INC BITCNT ;COUNT UP 
BEQ DYNO ;BIT IS NOT GOING TO SET 
BR 19$ 
DYNO: 
MOV @RHCS1, $REGO ;SET UP NEEDED BITS ONLY 
BIC #GO!IE'RDY!A16!A17!PSEL!DVA!MCPE !READ6, $REGO 
;CLEAR BITS NOT NEEDED 
MOV @RHCS1,CS1 ;SAVE RHCS1 
MOV @RHWC , WC ;SAVE WORD COUNT 
MOV @RHBA ,BA :SAVE BUS ADDRESS 
TST R1 71S IT AN RH11 
BEQ 87$ :NO IT'S A 70 
CLR BAE ;CLEAR BAE 
CLR CS3 sCLEAR CS3 
JMP 86$ 3; CONT INUE 
87$: MOV @RHBAE ,BAE ;SAVE BUS ADDRESS EXTENSION 
MOV @RHCS3,CS3 SAVE RHCS3 
86$: MOV @RHCS2,CS2 SAVE CS2 
MOV @RHST ,DS1 sSAVE TESTER STATUS 
MOV @RHER,ER1 :SAVE ERROR REGISTER 
MOV @RHTDB,TDR ;SAVE TESTER DATA REG. 
MOV @RH*R2 , TC ;SAVE MR2 TESTER REG. 
BIT ARDY ,A@RHCS1 71S READY SET 
BNE 99$ :YES CONTINUE TEST 
ERROR 102 ;READY NOT SET 
JSR R7,WHYFO zANY ERRORS SET 
99$: BIT MUPE , ARHCS2 31S UPE SET 
BNE 1$ :YES CHECK TRE AND SC 
CMP #SC!TRE,SREGO 31S THE SC AND TRE BITS SET 
BEQ :YES UPE IS IN ERROR 
BIT A#TRE ,SREGO :1S JUST THE TRE BIT SET 
BNE 3$ ;TRE BIT MUST BE IN ERROR 
BIT #SC,$REGO 31S JUST THE SC BIT SET 
BNE 4$ 7SC BIT SET ERRONIOUSLY 
ERROR 20 ;UPE NOT SET IN RHCS2 
BR $ ;SET UP TO TEST AGAIN 
1$: CMP #SC!TRE,$REGO 71S SC AND TRE SET 
BNE 22$ :FIND THE ERROR 
MOV $CS1,$CS1 > TEST FOR SHORTS 
MOV WMPE 'MXF ' PGE 'NEM!NED! WCE !DLT,$CS2 
MOV MAPE 'DPELO! WCEHI 'WCELO! 1E3,$CS3 
MOV $ST,S$ST 
MOV SER,SER 
MOV #~1 ,BEF ORE ; TELL WHYFO ITS FOR SHORTS 
JSR R7,WHYFO ; TEST FOR SHORTS 
CLR BEF ORE sWE HAVE CHECKED FOR SHORTS 


JMP 8$ ;LEAVE THE TEST 


SEQ 0068 
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CZRHBF.P11 —- 26=JUL=79 10:13 T24 UPE,TRE,SC ERROR TEST (RH70) SEQ 0069 

3600 021206 032737 040000 001162 228: BIT ATRE , SREGO :THEN IS THE TRE BIT SET 
3601 021214 901082 BNE 6$ ‘SC BIT DID NOT SEE TRE BIT 
302 021216 032737 100000 001162 BIT #SC,$REGO [IS THE SC BIT SET 
3603 021224 001022 BNE 7$ ‘TRE HAS AN OPEN GOING TO BUS 
3604 021226 104006 ERROR 6 STRE SET LOGIC NOT WORKING 
3605 021230 000421 BR 8$ :SET UP TO TEST AGAIN 
3606 021232 104021 2$: ERROR 21 [UPE HAS OPEN IN LINE GOING TO BUS 
3607 021234 004737 007260 JSR R7,WHYFO TSEE IF ANY OTHER ERROR BIT IS 
3608 'SET OTHER THAN UPE 
3609 021240 000415 BR 8$ ‘SET UP TO TEST AGAIN 
3610 021242 104023 38: ERROR 23 SSOMTHING WRONG WITH TRE BIT 
3611 021244 004737 007260 JSR R7,WHYFO TSEE IF AN ERROR BIT IS SET 
3612 :0R BOTH UPE IN RHCS2 AND SC IN 
3613 RHCS1 HAS AN AN OPEN BE TWEEN IT AND THE BUS 
3614 021250 000411 BR 8$ “SET UP TO TEST AGAIN 
315 021252 104011 4$: ERROR 11 SC BIT T WAS SET BY EITHER ATTN OR 
3616 021254 004737 007260 JSR R7,WHYFO [FIND WHAT ERROR BIT IS SET 
3617 SMCPE ERROR OR SC IS SHORTED TO +5 VOLTS 
3618 021260 000405 BR 8s : SETUP TO TEST AGAIN 
3619 021262 104022 6$: ERROR 22 TRE WAS SET BY OTHER THAN UPE 
320 021264 004737 007260 JSR R7,WHYFO “FIND ERROR BIT THAT SET TRE 
3621 021270 000401 BR 8$ :SETUP TO EST AGAIN 
3622 021272 104013 7$: ERROR 13 ‘TRE HAS AN OPEN GOING TO THE BUS 
3623 021274 032737 041400 177570 8$: BIT #SW14!SW9!SW8,a4177570 ZANY LOOPING BEEING DONE 
3624 021302 001003 BNE 21$ :YES.LOAD TRE NO MATTER WHAT 
%25 021304 105737 001103 TSTB - $ERFLG WAS THERE AN ERROR 
3626 021310 001010 BNE 9$ :SKIP TRE CHECK 
3627, 021312 112777 000100 162044 21$: § MOVB  ¥#TREB,@RHCS1B “LOAD TRE 
3628 021320 032777 020000 162012 BIT —- #UPE,, @RHCS2 [DID ERROR CLEAR 

021326 001401 BEQ 9$ :YES EXIT TEST 
3630 021330 104050 ERROR 50 | LOADING TRE DID NOT CLEAR ERROR 
3631 021332 004737 006626 9$: JSR R7,CLEER SEE IF ERRORS ARE CLEARED 
3632 021336 004737 050244 VSR R7_.ERRTST 

=) ; 

3034 021342 FANGIE: 
3636 FREER EEKEEEEEEEERKEREREEEREEEEREEEKEEKEEEEEEEEEEKEEEEEEEE 
3637 tSTEST 25 NED BIT TEST 
3638 :*THIS TEST WILL CHECK THAT NED (NON-EXISTANT DRIVE) 
3639 SOSETS TRE MOD SC BITS 10 PACS). cccccccoccceccocuss 
3640 PPTITIITI TITLE ELE LEER 
3641 021342 000004 15125: SCOPE 
3643 021344 012777 000000 161766 MOV #ZERO, @RHCS2 :SETUP NED 
3644 021352 005701 TST R1 *RH11 OR RH70 
3645 021354 03 BMI ERR [IT'S AN RH11 
3646 021356 012777 161774 MOV #ZERO, @RHBAE SSETUP BA EXTENSION 
3647 021364 012777 177777 161740 NEDERR: MOV #~1, ARHWC [FOR A 1 WORD TRANSFER 
3648 021372 012777 001172 161734 MOV EG4 ‘SETUP BA 

021400 012777 1 161722 #WRITEO, @RHCS1 ‘TELL IT TO WRITE 
3650 021406 005037 003446 CLR BITCNT [CLEAR BIT COUNTER 
3651 021412 032777 000200 161710 18%: BIT #RDY ,@RHCS1 ‘IS RDY SET 
3652 021420 001015 BNE BAKER :BIT IS SET 
3653 021422 005237 003446 INC BITCNT OUNT UP 
3654 021426 001371 BNE 18$ “NOT FINISHED COUNTING 


3655 021430 005037 003446 CLR BITCNT GET READY TO DO IT AGAIN 


MASSBUS RH70 AND RH11 Say et Ae 


CZRHBF .P11 


26-JUL-79 


017737 
042737 


017737 


10:1 
000200 
003446 


161650 
027777 


1634 


161666 


161516 


161510 
001162 
001162 
001162 


001162 
001162 


MACY11 30A(1052) 
T25 NED BIT 


19$: 


87$: 
86$: 


99$: 


1$: 


223: 


e$: 


F 
26-JUL-79 
TEST 


#RDY ,@RHCS1 :1S_IT SET YET? 

BAKER 7 YES 

BITCNT ; COUNT UP 

BAKER :BIT IS NOT GOING TO SET ° 

19$ 

@RHCS1 , $REGO ;SET UP NEEDED BITS ONLY 

#GO!TE'RDY!A16!A17!PSEL!DVA!MCPE!READ6,$RESO 
;CLEAR BITS NOT NEEDED 

@RHCS1,CS1 7SAVE RHCS1 

@RHWC , WC SAV D 

@RHBA, : SAVE BUS ADDRESS 

R1 71S I1 ANR 

87$ ;NO_ IT'S A 70 

BAE CLEAR 

CS3 sCLEAR CS3 

86$ ; CONT INUE 

@RHBAE ,BAE 7SAVE BUS ADDRESS EXTENSION 

@RHCS3,CS3 2 SAVE R RHCS3 

@RHCS2,CS2 ;SAVE CS2 

@RHST.0S1 :SAVE TESTER STATUS 

@RHER ,ER1 :SAVE ERROR REGISTER in, 

@RHTDB, TDR : SAVE ity 2 Sen REG. 

@RHMR2 , TC SAVE MR2 T REG. 

ARDY ,@RHCS1 HIS READY ser 

99$ YES CONTINUE TEST 

102 READY NOT S 

R7 ,WHYFO sANY ERRORS SET 

#NED ,@RHCS2 :1S_NED SET 
:YES CHECK TRE AND 

#SC! TRE ,SREGO 21S _ THE SC AND TRE aITs SET 

$ YES NED IS_IN ERROR 

ATRE ,SREGO 21S JUST THE TRE BIT SET 
:TRE BIT MUST BE IN ERROR 

ASC ,$REGO :1S JUST THE SC BIT SET 

4$ :SC BIT SET ERRONIOUSLY 

24 3;NED NOT SET IN RHCS2 

8$ SET UP TO Lt AGAIN 

MSC! TRE, SREGO :1S SC_AND TRE SET 

22S iF IND THE ERROR 

#ZERO,$CS1 Ft FOR SHORTS 

WME 'MXF | PGE !NEM! UPE ! WCE !DLT 

WAPE 'DPEHI !DPELO!WCEHI !WCELO! TEs, $CS3 

$ST,$ST 

$ER,SER 

#-1 ;BEF ORE ; TELL WHYFO ITS FOR SHORTS 

R7 ,WHYF O TEST FOR SHORTS 

BEF ORE i WE —_“ CHECKED FOR SHORTS 

8$ LEAVE THE TEST 

ATRE , SREGO : THEN IS THE TRE E 

$ :SC BIT DID NOT SEE TRE BIT 

#SC,$REGO THE SC BIT SE 

7$ : HAS AN OPEN GOING '0 BUS 

6 TRE SET LOGIC NOT WORKING 

8$ : UP TO TEST AGAIN 

25 D HAS OPEN IN LINE GOING TO BUS 


6 
10:39 PAGE 71 


SEQ 0070 


G 6 
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CZRHBF .P11 26-JUL-79 10:13 T25 NED BIT TEST SEQ 0071 
3712 022004 004737 007260 JSR R7,WHYFO ;SEE IF ANY Asa ERROR BIT IS 
3713 :SET OTHER THAN NED 
3714 022010 000415 BR 8$ 7SET_ UP TO Test AGAIN 
3715 022012 104026 3$: ERROR 26 TSOMTHING WRONG WITH TRE BIT 
3716 022014 004737 007260 JSR R7 ,WHYFO ;SEE_IF AN ERROR BIT IS SET 
3717 ;OR BOTH NED IN RHCS2 AND SC 
3718 ;RHCS1 HAS AN wre BETWEEN IT AND THE BUS 
3719 022020 000411 BR 8$ ;SET UP TO TEST AGAIN 
3720 022022 104011 4$: ERROR 11 335 BIT WAS SET BY EITHER ATTN OR 
3721 022024 004737 007260 JSR R7,WHYFO ; FIND WHAT ERROR BIT IS SET 
3722 “MCPE ERROR S SC IS SHORTED TO +5 VOLTS 
3723 022030 000405 BR 8$ aes TO TEST AGAIN 
3724 022032 104027 6$: ERROR 27 TRE WAS SET BY OTHER THAN NED 
3725 022034 004737 0607260 JSR R7,WHYFO [FIND ERROR BII THAT SET TRE 
3726 022040 0 8$ ;SETUP TO TEST AGAIN 
3727 022042 104013 7$: ERROR 13 ;TRE HAS AN OPEN GOING TO THE BUS 
3728 022044 032737 041400 177570 8$: BIT #SW14!SW9!SW8,84177570 ;ANY LOOPING BEEING DONE 
3729 022052 001003 BNE 21$ -;YES,LOAD TRE NO MATTER WHAT 
3730 022054 105737 001103 TSTB SERFLG ;WAS THERE AN ERROR 
3731 022060 001010 BNE 9 SKIP TRE CHECK 
3732 022062 112777 000100 161274 21$: MOVB #TREB,@RHCS1B LOAD TRE 
3733 022070 032777 010000 161242 BIT #NED ,@RHCS2 ;DID ERROR CLEAR 
3734 022076 001401 BEQ 9$ YES EXIT TEST 
3735 022100 104050 ERROR 50 ’ : LOADING TRE DID NOT CLEAR ERROR 
3736 022102 004737 006626 9$: JSR R7,CLEER SEE IF ERRORS ARE CLEARED 
aL 022106 004737 050244 JSR R7,ERRTST 
3739 
3740 DI III IOI IISIIUIIIUIOIIIIUIOIIUIIUIUIOUIOIUIIIU IID ti itot tit 
3741 T*TEST 26 MXF ,TRE AND SC BIT TEST 
3742 ;*THIS TEST WILL CHECK THAT MXF 
3743 :*(MISSED TRANSFER ERROR) WILL 
3744 7*SET TRE AND SC BITS........... 

745 LER ERE REE ERE EERE ERR ER ER ER ee 
$09 022112 000004 TST26: SCOPE 

3748 022114 012777 000027 161216 MOV #PAT!7,@RHCS2 7SET MXF BIT 

3749 022122 012777 177777 161202 MOV #~-1 , @RHWC ;SET UP WORD COUNT 

3750 022130 012777 004100 161176 MOV #RBUF , pam : SETUP BA 

3751 012777 161204 MOV #ZERO, @RHTDB :SET MXF ERROR 

3752 022144 012777 000061 161156 MOV WWRITEO, @RHCS1 :TELL IT TO WRITE 

3753 022152 005037 003446 CLR BITCNT ;CLEAR BIT COUNTER 

3754 022156 032777 000200 161144 18$: BIT ARDY ,ARHCS1 71S RDY SET 

3755 022164 001015 BNE CHARLE ~ :BIT IS * vid 

3756 022166 005237 003446 INC BITCNT ; COUNT 

3757 022172 001371 BNE 18$ NOT FINISHED COUNT ING 
3758 022174 005037 003446 CLR BITCNT ;GET READY TO 5° IT AGAIN 
3759 022200 032777 000200 161122 19S: BIT #RDY ,@RHCS1 ' gIS IT SET YET? 

3760 022206 001004 BNE CHARLE 7 YES 

3761 022210 005237 003446 INC BITCNT ; COUNT UP 

3762 022214 001401 BEQ CHARLE :BIT IS NOT GOING TO SET 
3763 022216 000770 BR 19$ 

3764 022220 CHARLE : 

3765 022220 017737 . 161104 001162 MOV @RHCS1, $REGO ;SET UP NEEDED BITS ONLY 
3766 022226 042737 027777 001162 BIC #GO!TE'RDY!A16!A17!PSEL !DVA!MCPE !READ6, $REGO 


3767 : :CLEAR BITS NOT NEEDED 
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CZRHBF .P11 26-JUL-79 10:13 726 MXF ,TRE AND SC BIT TEST SEQ 0072 

3768 022234 017737 161070 003420 MOV @RHCS1,CS1 ;SAVE RHCS1 
3769 022242 017737 161064 003444 MOV @RHWC , WC ;SAVE WORD COUNT 
3770 022250 017737 161060 003414 MOV @RHBA ,BA SAVE _BUS ADDRESS 
3771 022256 005701 TST R1 21S IT AN RH11 
3772 022260 001406 BEQ 87$ 3NO_IT'S A 70 
3773 022262 005037 003416 CLR BAE CLEAR BAE - 
3774 022266 005037 003424 CLR Cs3 [CLEAR CS3 
3775 O22272 000137 022312 JMP 86$ : CONT INUE 
3776 022276 017737 161056 003416 87S: MOV @RHBAE ,BAE SAVE or ADDRESS EXTENSION 
3777 O22 017737 161052 003424 MOV @RHCS3,CS3 SAVE R HCS3 
3778 022312 017737 161022 003422 86$: MOV @RHCS2,CS2 SAVE CS 
3779 022320 017737 161016 003432 MOV @RHST,DS1 7SAVE TESTER STATUS 
3780 022326 017737 161012 003436 MOV @RHER ERI sSAVE ERROR REGISTER 
3781 022334 017737 161010 003442 MOV @RHTDB, TDR 7SAVE TESTER DATA REG. 
3782 022342 017737 160770 003440 MOV @RHR2 , TC ;SAVE _MR2 TESTER REG. 
3783 022350 032777 000200 160752 BIT ARDY ,@RHCS1 [1S READY SET 
3784 022356 001003 BNE 99$ YES CONTINUE TEST 
3785 022360 104102 ERROR 102 sREADY NOT SET 
3786 022362 004737 007260 JSR R7 ,WHYFO zANY ERRORS SET 
3787 022366 032777 001000 160744 99$: BIT AMXF ,ARHCS2 71S MXF SET 
3788 022374 001016 BNE 1 YES CHECK TRE AND SC 
3789 022376 022737 140000 001162 CMP MSC! TRE ,$REGO 1S _ THE SC AND TRE BITS SET 
3790 022404 001460 BEQ 7YES MXF IS_ IN ERROR 
3791 022406 032737 040000 001162 BIT ATRE , SREGO 1S JUST THE TRE BIT SET 
3792 022414 001060 BNE $ 7TRE BIT MUST BE IN ERROR 
3793 022416 032737 100000 001162 BIT #SC,$REGO 71S JUST THE SC BIT SET 
3794 022424 001060 BNE 4$ :SC BIT SET ERRONIOUSLY 
3795 022426 104030 ERROR 30 :MXF NOT SET IN RHCS2 
3796 022430 000467 BR 8$ SET UP TO TEST AGAIN 
3797 022432 022737 140000 001162 1$: CMP #SC! TRE, SREGO :1S SC_AND TRE SET 
3798 022440 001030 BNE 22$ :FIND THE ERROR 
3799 022442 012737 020000 004124 MOV #MCPE ,$CS ;TEST FOR SHORTS 
3800 022450 012737 176400 004126 MOV #MPE BCE 'NEM!NED !UPE !WCE ‘DLT, $CS2 
3801 022456 013737 004130 004130 MOV $CS3,$CS3 
3802 022464 013737 004132 004132 “MOV $ST,$ST 
3803 022472 012737 030165 004134 MOV WILF !RMR! DPE !RMBEX!RFAIL !DTE!OPI, SER 

022500 012737 177777 004122 MOV #~1 ,BEF ORE TELL WHYFO ITS FOR SHORTS 
3805 022506 004737 007260 JSR R7 ,WHYFO :TEST FOR SHORTS 

022512 005037 004122 CLR BEF ORE SWE HAVE CHECKED FOR SHORTS 
3807 022516 137 022610 JMP 8$ SLEAVE THE TEST 
3808 022522- 032737 04 001162 22$: BIT #TRE , SREGO : THEN IS THE TRE BIT SET 
3809 022530 001022 BNE 6$ :SC BIT DID NOT SEE TRE BIT 
3810 022532 032737 100000 001162 BIT #SC,$REGO 71S _ THE SC BIT SET 
3811 022540 001022 Se 7$ ; TRE ING TO BUS 
3812 022542 104 ERROR 6 :TRE SET LOGIC NOT WORKI 
3813 022544 000421 " BR 8$ 3 AY UP TO TEST AGAIN 
3814 022546 104031 2$: ERROR 31 HAS OPEN _IN LINE GOING TO BUS 
a2 022550 004737 007260 ~~ _ JER R7 ,WHYFO SEE | ek. tinal omen BIT IS 
3817 022554 000415 BR ~~ 8$ 3SET UP TO TEST AGAIN 
3818 022556 104032 3$: ERROR 32 :SOMTHING WRONG WITH TRE BIT 
3819 022560 004737 007260 JSR R7,WHYFO [SEE IF AN ERROR BIT IS S eh 
3820 [OR BOTH MXF IN a AND SC_IN 
3821 ;RHCS1 HAS AN ree TWEEN TT AND THE BUS 
3822 022564 000411 BR &$ SET UP TO TEST AGAIN 
3823 022566 104011 4$: ERROR 11 :SC BIT WAS SET BY EITHER ATTN OR 
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022574 
022576 
022600 
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004737 


017737 
042737 


017737 


017737 


007260 


007260 


041400 
001103 
000100 
001000 


006626 
050244 


160 
160252 


177570 


160530 
160476 


160452 
160440 


160452 
160414 
160406 


160374 


160352 


003416 
003424 
003422 


MACY11 "Tr The 
126 MXF 


6$: 
7$: 
8$: 


21$: 


9$: 


JSR 


I 
26-JUL=79 


R7,WHYFO 


33 
R7,WHYFO 
8$ 


13 
ee ere 


2 

laa 
#TREB,@RHCS1B 
AMXF ,@RHCS2 


50 
R7,CLEER 
R7,ERRTST 


6 
10:39 PAGE 74 
E AND SC BIT TEST 


FIND WHAT ERROR BIT IS SET 
sMCPE_ERROR OR SC IS SHORTED TO +5 VOLTS 
+ SETUP TO TEST AGAIN 
TRE WAS SET BY OTHER THAN MXF 
FIND ERROR BIT THAT SET TRE 
SETUP TO TEST AGAIN 
;TRE HAS AN OPEN GOING TO THE BUS 
ANY LOOPING BEEING DONE 
oes LOAD TRE NO MATTER WHAT 
S_THERE AN ERROR 
:SkIP ~ CHECK 


‘DID ERROR CLEAR 


:YES EXIT TEST 
;LOADING TRE DID NOT CLEAR ERROR 


[SEE IF ERRORS ARE CLEARED 


FREER EKER EREREEEEEREEEEEREREREEEREEEEKREREEEEREKEREKEEE 


SATEST 27 


TST27: 


JUMP: 


18$: 


19$: 


PGETST: 


87$: 
86$: 


ERROR BIT 


PGE TEST 
3*THIS TEST FORCES PGE TO SET IN RHCS2 


;*AND VERIFYS TRE AND SC IS SET IN RHCS1 


DUIS AAAI IOIUIDIOIIIOIDIIIOITIOIUIOIOIIOIIIIEI IOI II III IIIT I 


SCOPE 


#7 ,ARHCS2 
en 


. JUMP 
#ZERO, @RHBAE 


MWRITEO,@RHCS1 
BITCN 


@RHCS1,$R 


;SET UNIT NUMBER 
:SETUP BUS ADDRESS 
71S IT AN 11 OR A 70 
ITS AN RH11 

: SETUP 


: BAE 

sTELL IT TO WRITE 

;CREATE THE ERROR 

;CLEAR BIT COUNTER 
:IS RDY SET 

3BIT IS SET 


; COUNT UP 
NOT FINISHED COUNTING 


:GET READY 10 DO IT AGAIN 
iS SET YET? 


: COUNT UP 
:BIT IS NOT GOING TO SET 


UP NEEDED Brej0e" 


EGO SET 
MGO!TEIRDY!A16!A17!PSEL !DVA!IMCPE !READG $R 


@RHCS1,CS1 
HWE , WC 


AR BITS NOT NEEDED 
:SAVE RHCS1 
SAVE WORD COUNT 
; SAVE BUS ADDRESS 


CONT NUE 
SAVE BUS ADDRESS EXTENSION 
7SAVE RHCS3 

SAVE CS2 


SEQ 0073 
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160174 99%: 


001162 
007162 
001162 


001162 1$: 


001162 22%: 


2s: 


3$: 


4$: 
6$: 


7$: 
177570 8$: 


PGE ERROR BIT TEST 


MOV @RHST ,DS1 
MOV @RHER,ER1 
MOV @RHTDB, TDR 


+ SAVE TESTER ao teten 
VE ERROR REGIST 
: SAVE TESTER DATA REG. 


MOV @RHMR2 , TC SAVE MR2 TESTER REG. 
BIT #RDY ,@RHCS1 HS READY SET 

BNE 99$ :YES CONTINUE TEST 
ERROR 102 sREADY NOT SET 

JSR R7 ,WHYFO zANY ERRORS SET 

BIT #PGE , @RHCS2 71S PGE SET 

BNE 1 7YES CHECK T 

CMP #SC! TRE, $REGO fe THE S 


BIT #TRE ,$REGO 

BN $ 

BIT #SC ,SREGO 
4$ 


BNE ; 
ERROR 51 3PGE NOT SET IN RHCS2 
BR 8$ :SET UP TO TEST AGAIN 
CMP #SC! TRE ,SREGO IS SC_AND TRE 
BNE 228 :FIND THE ERROR 
MOV $CS1,$CS1 ;TEST FOR SHORTS 
MOV WMPE iMXF !NEM!NED!UPE !WCE!DLT,$CS2 
MOV $CS3, * $3 
MOV ST,$ST 
MOV WILF CPE )RMR!DPE !RMBEX!RFAIL !DTE 1OPI SER 
MOV #~-1 ,BEF ORE sTELL WHYFO ITS FOR SHORTS 
JSR R7 ,WHYFO : TEST FOR SHORTS 
CLR BEF ORE sWE HAVE pec FOR SHORTS 
JMP 8$ : LEAVE THE T 
BIT #TRE , SREGO ; THEN IS THE TRE BIT SET 
BNE 6$ 7SC BIT DID NOT SEE TRE BIT 
BIT #SC ,SREGO 1S _ THE SC BIT SET 
7$ : GOING TO BUS 
ERROR 6 :TRE SET LOGIC NOT WORKING 
BR es :SET UP TO TEST AGAIN 
ERROR 123 PGE HAS OPEN IN LINE GOING TO BUS 
JSR R7,WHYFO saat IF ANY OTHER ERROR BIT IS 
SET OTHER as gery —_—— 
8$ SET UP TO TEST IN 
ERROR 171 >SOMTHING WRONG uITH TRE BIT 
JSR R7,WHYFO :SEE_IF AN ERROR BIT IS SET 
OR BOTH PGE IN RHCS2 AND SC IN 
7RHCS1 AN OPEN BETWEEN IT AND THE BUS 
8$ SET UP TO TEST AGAIN 
ERROR 11 :SC BIT WAS SET BY EITHER ATTN OR 
JSR R7 ,WHYFO FIND WHAT ERROR BIT IS SET 
:MCPE ERROR OR SC _IS SHORTED TO +5 VOLTS 
BR 8$ SETUP TO TEST AGAIN 
ERROR 172 TRE WAS SET BY OTHER 
JSR R7 ,WHYFO FIND ERROR BIT THAT SET TRE 
BR 8$ Aa TO TEST AGAIN 


13 
BIT + T tilinetlaaal 77570 S ANY LOOPING 


BNE Y 
TSTB SERFLG WAS THERE AN 
BNE 9$ SKIP TRE CHECK 


SEQ 0074 
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CZRHBF .P11 26-JUL-79 10:13 T27 ERROR BIT TEST SEQ 0075 
3936 023376 112777 000100 157760 21$: MOVB #TREB, @RHCS1B ;LOAD TRE 
3937 023404 032777 002000 157726 BIT #PGE ,aRHCS2 DID ERROR 5 im 
3938 023412 001401 BEQ 9$ 7 YES EXIT TEST 
3939 023414 104050 ERROR 50 LOADING TRE DID NOT CLEAR ERROR 
3940 023416 004737 004626 9$: JSR R7,CLEER iSEE IF ERRORS ARE CLEARED 
3941 023422 004737 050244 JSR R7,ERRTST 
3942 FERRARA EEEREEEEKEEEEERERAEEKEEERRERREREERERREREERERREEEE 
3943 {A TEST 30 MXF,TRE AND SC BIT TEST (RH11 ONLY) 
3944 ;*THIS TEST SEES IF MXF CAN BE SET BY A MOVE 
3945 ; * INSTRUCTION AND THAT TRE AND SC ARE SET IN 
3946 : *RHCS1 -MXF_CAN BE SET ay 1 WAY IN AN RH11 BUT CN 
3947 NOT BE SET THIS WAY IN AN RH70........cccecceees 
3948 5 -encdiilacsnepaaahanantbareasonseameameeseaeeheeakaiaahiiel 
3949 023426 000004 TST30: SCOPE 
3950 023430 005701 TST R1 31S IT A 70 OR 1 
3951 023432 100402 . BMI LEAP IT'S AN RH11 00 THE TEST 
3952 023434 000137 024160 JMP FROG ;RH70,EXIT TEST 
3953 023440 012777 000007 157672 LEAP: MOV #7 ,@RHCS2 ; SETUP UNIT 7 
3954 023446 052777 001000 157664 BIS #MXF , ARHCS2 MXF 
3955 023454 005037 003446 CLR BITCNT CLEAR BIT COUNTER 
3956 023460 032777 001000 157652 18$: BIT #MXF , ARHCS2 21S_MXF SET 
3957 023466 001015 BNE MIXIT :BIT is SET 
3958 023470 005237 003446 INC BITCNT T UP 
023474 001371 BNE 18$ NOT FINISHED COUNTING 
3960 023476 005037 003446 CLR BITCNT GET READY TO dO IT AGAIN 
3961 023502 032777 001000 157630 19$: BIT WMXF , @RHCS2 71S IT SET YET? 
3962 023510 001004 BNE MIXIT 7 YES 
3963 023512 005237 003446 INC BITCNT : COUNT UP 
3964 023516 001401 BEQ MIXIT BIT IS NOT GOING TO SET 
3965 023520 000770 19$ 
3966 023522 MIXIT: 
3967 023522 017737 157602 001162 MOV @RHCS1 , $REGO ;SET UP NEEDED BITS ONLY 
3968 023530 042737 027777 001162 BIC #GO!TE'RDY!A16!A17!PSEL !DVA!MCPE ! READ6, SREGO 
3969 ;CLEAR BITS NOT NEEDED 
3970 023536 017737 157566 003420 MOV @RHCS1,CS1 SAVE RHCS1 
3971 023544 017737 157562 003444 MOV @RHWC , WC SAVE WORD COUNT 
3972 023552 017737 157556 003414 MOV @RHBA ,BA :SAVE_BUS ADDRESS 
3973 023560 005701 TST R1 71S IT AN RH11 
3974 023562 1406 BEQ 87$ NO IT'S A 7 
3975 023564 005037 003416 CLR BAE CLEAR BAE 
3976 023570 005037 3424 CLR Cs3 :CLEAR CS3 
023574 000137 023614 JMP 86$ : INUE 
3978 023600 017737 157554 003416 87$: MOV @RHBAE ,BA SAVE BUS ADDRESS EXTENSION 
023606 017737 157550 003424 MOV @RHCS3, cs3 SAVE RHCS3 
023614 017737 157520 003422 86$: MOV @RHCS2,CS2 zSAVE CS2 
3981 023622 017737 157514 003432 MOV @RHST,DS1 7SAVE TESTER STATUS 
023630 017737 157510 003436 MOV @RHER ,ER1 SAVE ERROR REGISTER 
3983 023636 017737 157506 003442 MOV @RHTDB, TOR : SAVE TESTER DATA REG. 
3984 0c 017737 157466 003440 MOV QRH, TC E MR2 i t REG. 
3985 023652 032777 000200 157450 BIT ARDY ,@RHCS1 3s VREADY 
3986 023660 001003 BNE 99$ 7 YES CONTINUE TEST 
3987 023662 104102 ERROR 102 zREADY NOT SET 
3988 023664 004737 007260 JSR R7 ,WHYFO sANY ERRORS SET 
3989 023670 032777 001000 157442 99S: BIT WMXF , @RHCS2 21S _MXF acre 
023676 901016 BNE :YES CHECK T 


3990 RE AND SC 
3991 023700 022737 140000 001162 CMP #SC! TRE ,SREGO 71S THE SC AND TRE BITS SET 
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CZRHBF.P11  26=JUL=79 10:13 T30 MXF,TRE AND SC BIT TEST (RH11 ONLY) SEQ 0076 
3992 023706 001460 BEQ 2$ :YES MXF IS IN ERROR 
3993 023710 032737 040000 001162 BIT #TRE ,SREGO ‘IS JUST THE TRE BIT SET 
3904 023716 001060 BNE $ [TRE BIT MUST BE IN ERROR 
3995 023720 032737 100000 001162 BIT #SC,$REGO TIS JUST THE SC BIT SET 
3996 023726 001060 BNE 4$ ‘SC BIT SET ERRONIOUSLY 
3997 023730 104030 ERROR 30 :MXF NOT SET IN RHCS2 
3998 023732 000467 BR 3 ‘SET UP TO TEST AGAIN 
3999 023734 022737 140000 001162 1$: CMP #SC! TRE, $REGO tI1S SC AND TRE SET 
4000 023742 001030 BNE 22$ ‘FIND THE ERROR 
4001 023744 013737 004124 004124 MOV $CS1,$CS1 “TEST FOR SHORTS 
4002 023752 012737 176400 004126 MOV #MPE | PGE 'NEM!NED! UPE ! WCE !DLT,$CS2 
4003 023760 013737 004130 004130 MOV $CS3,$CS 
4004 023766 013737 004132 004132 MOV $ST, $e 
4005 023774 013737 004134 004134 MOV SER. SER 
4006 024002 012737 177777 004122 MOV #-1 * BEF ORE TELL WHYFO ITS FOR SHORTS 
4007 024010 004737 007260 JSR R7,WHYFO :TEST FOR SHORTS 
4008 024014 005037 004122 CLR BEF ORE ‘WE HAVE CHECKED FOR SHORTS 
4009 024020 000137 024112 JMP 8$ [LEAVE THE TEST 
4010 024024 032737 040000 001162 22$: BIT ATRE, $SREGO :THEN IS THE TRE BIT SET 
4011 024032 001022 BNE 6$ ‘SC BIT DID NOT SEE TRE BIT 
4012 024034 032737 100000 001162 BIT #SC,$REGO t1S THE SC BIT SET 
4013 024042 001022 7$ : AN GOING TO BUS 
4014 024044 ERROR 6 [TRE SET LOGIC NOT WORK 
4015 024046 000421 BR 8$ ‘SET UP TO TEST AGAIN 
4016 024050 104031 2$: ERROR 31 [MXF HAS OPEN IN LINE GOING TO BUS 
4017 024052 004737 007260 JSR R7,WHYFO iSEE IF ANY OTHER E ERROR BIT IS 
4019 024056 000415 BR 2 ‘SET UP TO TEST AGAIN 
4020 024060 104032 3$: ERROR 32 :SOMTHING WRONG WITH TRE BIT 
4021 024062 004737 007260 JSR R7,WHYFO [SEE IF AN ERROR BIT IS SET 
4022 ‘OR BOTH OF IN RHCS2 AND SC IN 
4023 [RHCS1 HAS AN OPEN BETWEEN IT AND THE BUS 
4024 024066 000411 BR 8$ ‘SET UP TO TEST AGAIN 
4025 024070 104011 4$: ERROR 11 SC elT Was SET BY EITHER ATTN OR 
4026 024072 004737 007260 JSR R7,WHYFO : FIND WHA T ERROR BIT T 
4027 MCPE ERROR OR SC IS SHORTED TO +5 VOLTS 
4028 024076 000405 BR 8$ SSETUP TO TEST AGAIN 
4029 024100 104033 6S: ERROR 33 ‘TRE WAS SET BY OTHER THAN MXF 
4030 024102 004737 007260 JSR R7 ,WHYFO [FIND ERROR BIT THAT SET TRE 
4031 024106 000401 BR 8$ :SETUP TO TEST AGAIN 
4032 024110 104013 7$: ERROR 13 ‘TRE HAS AN OPEN GOING TO THE BUS 
4033 024112 032737 041400 177570 8$: BIT #SW14!SW9!SW8,#177570 ANY LOOPING BEE 
4034 024120 001003 BNE 21$ YES,LOAD TRE NO MATTER WHAT 
4035 024122 105737 001103 TSTB  $ERFLG ‘WAS THERE AN ERROR 
4036 024126 001010 BNE 9$ *SKIP TRE CHECK 
4037 024130 112777 000100 157226 21$: § MOVB  #TREB,aRHCS1B [LOAD TRE 
4038 024136 032777 001000 157174 BIT WMXF , @RHCS2 ‘DID ERROR CLEAR 
4039 024144 001401 BEQ 9$ ‘YES EXIT TEST 
4040 024146 104050 ERROR 50 [LOADING TRE DID NOT CLEAR ERROR 
4041 024150 004737 006626 9$: JSR R7,CLEER TSEE IF ERRORS ARE CLEARED 
4042 026154 004737 050244 JSR R7.ERRTST 
4043 024160 FROG: 
4044 J AAA EEEKEEEEEEREREEEEEEEEEEEEREEEEEAEREEREREEEKE 
4045 S*TEST 31 MCPE AND SC ERROR TET 
4046 :aTHIS TEST CHECKS THAT MCPE CAN BE SET IN RHCS1 


4047 [*AND THAT MCPE SETS SC IN RHCS1.......2.-eeeeee 


MASSBUS _RH70 AND RH11 ayia i MACY11 "on tae 26-JUL=79 "8: :39 PAGE 78 
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4048 5 EAA REREREREAAREEREERREREEEREERREREREEREEEEKEEKER ARE 


4049 4160 000004 TST31 
4050 ;SETUP_UNIT 


NO. 
+ INVERT CONTROL PARITY 
; TRANSFER INFO TO 3 La 
;D0 IT FOR SECOND TIME 
CLEAR BIT COUNTER 
:IS_RDY SET 
:BIT is SET 

T UP 


7NOT FINISHED COUNTING 
7GET READY TO DO IT AGAIN 
18 17 SET YET? 


; COUNT UP 
;BIT IS NOT GOING TO SET 


: oe RHCS1 


; CONT INUE 
;SAVE BUS ADDRESS EXTENSION 
;SAVE RHCS3 


sSAVE CS2 
A re} TESTER STATUS 
SAVE ERROR REGISTER 
SAVE TESTER DATA REG. 
003440 P 7SAVE MR2 TESTER REG. 
156726 :IS READY 
BNE YES, TEST MCPE 
READY IS NOT SET 
JSR R7, 0 zANY ERRORS SET 
156710 : . #MCPE ,@RHCS1 21S MCPE SET 
#SC,@RHCS1 21S SC_SET 
22$ :SC 


7SC_NOT SET 

#TRE,$CS1 ;GET READY TO TEST FOR SHORTS 
aMPE IMXF | PGE !NEM!NED:UPE!WCE!DLT, $CS2 

R7 GHYFO 7SEE IF ANY SHORTS 


BEF ORE 
:GET OUT OF TEST 
ERROR OK BUT SC ms 
7NOT SET SC HAS OPEN T 
BUS OR MCPE GOING TO oe 
:GATE FOR SC WAS NOT SEEN 


024502 
: 1 tg DID NOT SET 
007260 J S_ THERE ANOTHER ERROR 
006626 : CLEAR ERRORS 
050244 JS R7,ERRTST S THERE AN ERROR 
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FERRARA REREEEREREREREREEREEREREREREERERERERRERREKEERREEREH 
TSTEST 32 DOUBLE TRANSFER TEST,1 WORD FROM AN ADDRESS BASE 4 
;*THIS TEST CHECKS THAT A ONE WORD TRANSFER 
t*FROM AN ADDRESS DIVISIBLE BY 4 WILL NOT SET 
+ *DBL IN RHCS3...+.--RH70 CLF cvdencaddencies . 
PITIIITIT ITLL LITT II TITEL LLL ELLE 


024512 000004 1$132: 
S_IN_AN RH11 


::GET out! OF TEST 
177777  aRHWC :SET UP WC FOR ONE WORD 
004000 156600 SSETUP BUS ADDRESS 
TSETUP BUS ADDRESS EXTENSION 


#7 ,ARHCS2 DEVICE 7 
156552 MOV ZTELL IT TO wRITEO 
BITCNT :CLEAR BIT COUNTER 
156540 : zIS_RDY SET 
BNE sBIT IS SET 
; T UP 


NOT FINISHED COUNTING 
:GET READY TO DO IT AGAIN 
156516 : :IS_ IT SET YET? 
BN’ $ ; YES 


ed dd od td 
dd dd dd 
WONAUSWN—O 


BRRKRRRRERSE 


; COUNT UP 
;BIT IS NOT GOING TO SET 


zSAVE RHCS1 

:SAVE WORD COUNT 

; SAVE BUS ADDRESS 
IT AN RH11 


3 INUE 
;SAVE BUS ADDRESS EXTENSION 
VE RHCS3 


sSAVE CS2 

: SAVE TESTER STATUS 
SAVE ERROR REGISTER 

“SAVE TESTER hy REG. 

sSAVE MR2 TESTER REG. 

21S READY SET 

;RDY SET CONT. TEST 

READY DID _ SET 


SR Y ERRORS SET 
156376 = 1$: #DBL , @ARHCS3 as DOUBLE SET 
2s :DBL SET 


; DBL wee RA ON A 1 WORD TRANSFER 
TELL WHY NOT 
2$: [CLEAR ERRORS 


Et itiitiiitititizitiiititiiitiiiiiiiiiiiiiitiiititiiitiiiiitit) 
s*TEST 33 DOUBLES TEST FOR TWO WORD BASE 4 ADOnE SS 

;*THIS TEST CHECKS THAT DOUBLE WILL SET FOR A 

;*TWO WORD TRANSFER STARTING FROM AN ADDRESS 


006626 
050244 
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025256 


025262 
025264 
025266 
025270 


26-JUL~ 


so 


012777 


156222 
156216 
156212 


003416 
00 


007260 
006626 
050244 


177775 


156312 
156306 
156274 
156262 


156240 


156120 


156034 


MACY11 30A(1052) 
13 


78133: SCOPE 
TST R1 -1S IT aN 11 OR A 70 
BMI TST34 z:GET OUT OF T 
MOV #=2,aRHwWC 
MOV WE VENAD , @RHBA : 
MOV M#WRITEO, ARHCS1 ‘TELL IT TO WRITE 
CLR BITCNT : CLEAR Bu COUNTER 
18$: BIT ARDY ,@RHCS1 71S RDY SET 
BNE DBLWDS ‘BIT 15 SET 
INC BITCNT : COUNT UP 
BNE 18$ 
CLR TCNT 
19$: BIT ARDY , @RHCS1 31S IT SET ¥ 
BNE LwDS “YES 
INC BITCNT 
BEQ DBL WD 
BR 19$ 
DBLWDS: 
MOV @RHCS1,CS1 :SAVE RHCS1 
MOV @RHWC, SSAVE WORD C 
MOV @RHBA, SAVE BUS ADDRESS 
TST R1 :IS IT AN RH1 
BEQ 87$ ‘NO IT'S A 70 
CLR BAE EAR BAE 
CLR CS3 :CLEAR CS3 
JMP 86$ TI 
87$: MOV E, 
MOV @RHCS3,CS3 
86$: MOV @RHCS2,CS2 : CS2 
MOV @RHST,DS1 TSAVE TESTER STATUS 
MOV @RHER,ER1 SSAVE ERROR REGISTE 
MOV @RHTDB, TD : 
MOV @RHMR2, TC SAVE MR2 
BIT WRDY ,@RHCS1 [IS READY SET 
BNE FOOEY :RDY IS SET 
ERROR 102 =RDY DID NOT SET 
JSR R7,WHYFO “ANY ERRORS S 
FOOEY: BIT #DBL ,@RHCS3 71S DOUBLE SET 
BNE RIR ‘DBL IS SE 
ERROR 127 
JSR R7 ,WHYFO TANY OTHER ERR 
ERIR: JSR R7.CLEER *CLEAR ERRORS 
SR 7° ERRTST 
STEST 34 DOAMME TEST .% WORD TRANSFER FROM A BASE & ADDRES 
SSTEST 34 DOUBLE TEST ,3 WORD TRANSFER FROM A BASE 4 ADDRESS 
:*THIS TEST CHECKS THAT DBL WILL NOT SET 
*IN RHCS3 AFTER A 3 WORD TRANSFER STARTING 
; #FROM AN ADDRESS D1VISABLE BY 4 
2 POOR we TUES TT as hath Boe EEE SE Cee E EET tt: a 
1ST34: SC 
TST R1 s1S 
BMI TST35 ::GET OUT OF TEST 
MOV #-3, ARHWC 


8 7 
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80 
DOUBLES TEST FOR TWO WORD BASE 4 ADDRESS 
s*DIVISABLE BY 4. 


S DR Vasecusesvceas 


eR RRRERRRRRRRRRERRRRRERERRRERERRRRERERERRERRRERERR EERE EERE RE 


SETUP BORD COUNT FOR DOUBL 
ECT BA 


;NOT FINISHED COUNTING 
:GET READY wer DO IT AGAIN 


: COUNT UP 
;BIT IS NOT GOING TO SET 


: NUE 
SAVE BUS ADDRESS EXTENSION 
;SAVE RHCS3 


IT AN 11 OR A 70 
SET UP FOR A 3 WORD TRANSFER 


SET 
:DBL DID NOT td Ags RHCS3 


SEQ 0079 
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Oe3¢76 


025540 


26-JUL-79 
012777 


3s 
RS 


ooo 
ah ad ond 
MN 
N 
N 
N 


10:1 


007260 
006626 
050244 


177774 


000061 
003446 
000200 
003446 


C 7 
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134 DOUBLE TEST ,3 WORD TRANSFER FROM A BASE 4 ADDRESS 


156030 MOV M#EVENAD , @RHBA ; CORRECT BA 
156016 MOV MWRITEO,@RHCS1 ;TELL IT TO WRITE 
CLR BITCNT ;CLEAR BIT COUNTER 
156004 18$: BIT #RDY ,@RHCS1 31S RDY SET 
BNE THREE :BIT - SET 
INC BITCNT T UP 
BNE 18$ “NOT FINISHED COUNTING 
CLR BITCNT GET READY TO DO IT AGAIN 
155762 19%: BIT #RDY ,@RHCS1 IS IT SET YET? 
BNE THREE sYES 
INC BITCNT ;COUNT UP 
BEQ loser ;BIT IS NOT GOING TO SET 
THREE: 
003420 MOV @RHCS1,CS1 ;SAVE RHCS1 
003444 MOV @RHWC , WC ;SAVE WORD COUNT 
003414 MOV @RHBA ,BA ;SAVE BUS ADDRESS 
TST R1 :1S IT AN RH11 
BEQ 87$ sNO IT'S A 7 
CLR E CLE 
CLR CS3 sCLEAR CS3 
JMP 6$ ; CONTINUE 
003416 87$: MOV @RHBAE , BAE ;SAVE BUS ADDRESS EXTENSION 
003424 MOV @RHCS3,CS3 ;SAVE RHCS3 
003422 86S: MOV @RHCS2,CS2 sSAVE CS2 
003432 MOV @RHST,DS1 ; SAVE TESTER STATUS 
003436 MOV @RHER ,ER1 SAVE ERROR REGISTER 
003442 MOV @RHTDB, TDR SAVE TESTER DATA REG. 
003440 MOV @RHR2 , TC + SAVE MR2 TESTER REG. 
155626 BIT ARDY ,@RHCS1 31S READY SET 
BNE ERRIP sRDY IS SET 
ERROR 102 sRDY DID NOT SET 
JSR R7,WHYFO ‘ANY ER 
155642 ERRIP: BIT #DBL ,@RHCS3 71S DOUBLE SET 
BEQ ERPIP ;DBL IS SET 
ERROR 126 ;DOUBLE SET ON A 3 WORD TRANSFER 
JSR R7,WHYFO ;SEE IF ANY ERROR BITS ARE SET 
ERPIP: JSR R7,CLEER SCLEAR ERRORS 
JSR R7,ERRTST 


LL RRERRREREREREEEERERRERERERERERERERERERERERERRERERERERER EEE 
:*TEST 35 DOUBLE TEST ,4 WORDS FROM A BASE 4 ADDRESS 
pts TEST CHECKS THAT DBL WILL SET IN RHCS3 
FTER A 4 WORD TRANSFER STARTING WITH AN 
: ADDRESS DIVISABLE oY GRERERERERERREEEERERER 
RH70 


FOROT ET et tet Bene BEE LET Cie tire dare tc 


TST35: SCOPE 
TST 


R1 T AN 11 OR A 70 

BM! TST36 22GET out! *. Test 
155556 MOV 4-4, @RHWC :SET UP FOR 4 WORD TRANSFER 
155552 MOV #EVENAD , @RHBA *CORRECT BA 
155540 MOV MWRITEO, @RHCS1 STELL IT TO WRITE 

CLR BITCNT ‘CLEAR BIT COUNTER 
155526 18$: BIT ARDY ,ARHCS1 71S RDY SET 

E b :BIT 1S SET 


BN DBLE 
INC BITCNT ; COUNT UP 


SEQ 0080 
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025610 


026102 


10:13 
003446 
000200 


003446 


ae 


MUM 


155366 


0066 
050244 


177777 
000 


155504 


155350 


155364 


MACY11 30A(1052) 
T35 DOUBLE TEST 


19%: 


DBLED: 


87$: 
86$: 


DAYAMS : 


ERR29: 


CDRA IO IIA IOI IOI SISIDIIOI IOI IOI IOIOISIOI IOUT ITO TOT TOT TOT TOT TOT TT TOT TE TIE 


i*TEST 36 


TST36: 


18$: 


WRITE 


{ SOPERA TION BEING PREFORMED WILL BE PRINTED OUT 


@RHBAE ,BAE 
@RHCS3,CS3 
@RHCS2,CS2 
@RH $1 


R7,ERRTST 


7 
26-JUL= -79° ps & 39 PAGE 82 
+4 WORDS FROM A BASE 4 ADDRESS 


NOT FINISHED COUNTING 
[GET READY TO 90 IT AGAIN 


: COUNT UP 
:BIT IS NOT GOING TO SET 


:I1S_IT SET YET? 
YES 


;SAVE RHCS1 
:SAVE WORD COUNT 
: SAVE BUS a la 


ae 


TINUE . 
“SAVE wo EXTENSION 


AVE CS2 
‘SAVE TESTER STATUS 
SAVE ERROR REGISTER 
TSAVE TESTER DATA REG. 


Bt 
Y IS SET 


zSAVE MR2 TESTER REG. 
Sarg: SET 


RDY DID NOT SET 


CLEAR ERRORS 


E TEST 1WORD TRANSFER READ 


FWD AND REV AND WITH BAI SET IN RHCS2 


IN ERROR MESSAGE. 


SCOPE 


re 
3:GET OUT OF TEST 
2 SET 


S_IN AN RH11 


IS 
;DOUBLE DID NOT SET AFTER A 4 WORD 
SEE IF ANY ERROR ARE SET 


DOUBL 
eSUniTE TEST CHECK DBL_IN RHCS3 WITHREAD FWD AND REV 


. 
1 pembnadbedetaababbskabbbbaqaenssaanceaeeeabeleesbabbbbbiannanss 


FOR ONE WORD 


UP WC 
;SETUP BUS ADDRESS 


;SETUP BUS ADDRESS EXTENSION 


DEVICE 7 


;TELL_1T TO READO 
[CLEAR BIT COUNTER 
DY SET 


:BIT IS SET 
T UP 


> COUN 
NOT FINISHED COUNTING 


SEQ 0081 


MASSBUS RH70 AND RH11_ ey et Me 
26-JUL-79 10: 


4328 026104 
110 


CZRHBF .P11 


4368 026310 


LARA 


MIMI UIT 


007260 
006626 
050244 


177776 
004000 
000000 
000017 
000061 
003446 
000200 
003446 
003446 
000200 


155212 


003420 
003444 
003414 


0034 
155056 


155072 


15 
15 
15 
15 
154754 
154742 


154720 


MACY11 yg 
136 


19$: 


3$: 


87$: 
86$: 


18: 


2$: 


CLR 
BIT 
BNE 


E 
26-JUL-79 
TEST 1WORD TRANSFER READ 


BITCNT 
 pbeaatee 


BITCNT 

3$ 

19$ 
@RHCS1,CS1 


@RHWC , WC 
—— 


@RHBAE ,BAE 
wees CS3 


7 
10:39 PAGE 83 


GET READY TO oe IT AGAIN 
4! Fld SET YET? 


; COUNT UP 
BIT IS NOT GOING TO SET 


;SAVE RHCS1 

7 SAVE .WORD COUNT 
;SAVE BUS ADDRESS 
:1S IT AN RH11 
NO_IT' 70 


; CONTINUE 
7SAVE BUS ADDRESS EXTENSION 
7SAVE RHCS3 


sSAVE CS2 

ZSAVE TESTER STATUS 
SAVE ERROR REGISTER 
SAVE TESTER DATA REG. 
SAVE MR2 TESTER REG. 
sae +. iat Y SET 

Y SET CONT. TEST 
READY DID NOT SET 
ANY ERRORS SET 

21S ene SET 


L SE 
“DBL = le ON A 1 WORD TRANSFER 
;TELL_ WHY NOT 
CLEAR ERRORS 


FEAR EEKERKEEKEKEEEKKEEKEEEKEEKEKEEEEREEEKKEREKEEREERK 


E TEST WITH 2 WORD TRANSFER AND BAI SE! 


TRTEST 37 


T$137: 


18$: 


19$: 


DOUBL 
; * THESE ie santa DBL_IN RHCS3 WI THREAD we REV 


*WRITE F 


REV AND WITH BAI SET INR 


: SOPERATION BEING PREFORMED WILL BE PRINTED OUT 
:*IN ERROR MESSAGE. 


li a Re WA oa 
Satanadcakbaababulabbeeaakenabarbisabbaadeaeshabbesbonunnnes 
1 :IS IN AN RH11 
TST40 22GET out OF TEST 
#2, @RHWC SET UP WC FOR TwO WORD 
#EVENAD , @RHBA *SETUP BUS ADDRESS 
#7ERO, @RHBAE [SETUP BUS ADDRESS EXTENSION 
#7 ‘BAI ,aRHCS2 “DEVICE 7 
#WRITEO, @RHCS1 ‘TELL IT TO WRITEO 
BITCNT “CLEAR BIT COUNTER 
ARDY ,@RHCS1 :I1S RDY SET 
4 ‘BIT IS SET 
BITCNT >COUNT UP 
18$ ‘NOT FINISHED COUNTING 
BITCNT :GET READY TO DO IT AGAIN 
#RDY , @RHCS1 1S 17 ScT YET? 


SEQ 0082 
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4384 026412 005237 003446 
4385 026416 00140! 

4386 026420 000770 
4387 026422 
4388 026422 017737 154702 
4389 026430 017737 154676 
4390 026436 017737 154672 
4391 026444 5701 
4392 026446 1406 
4393 026450 005037 003416 
4394 026454 005037 003424 
4395 026460 137 026500 
4396 026464 017737 154670 
4397 026472 017737 4664 
4398 026500 017737 154634 
4399 026506 017737 4630 
4400 026514 017737 154624 
4401 026522 017737 154622 
4402 026530 017737 154602 
4403 026536 032777 200 

04 026544 100 
4405 026546 104102 

06 026550 737 007260 
4407 026554 032777 20 
4408 026 001403 
4409 026564 104153 
4410 0265 004737 007260 
4411 026572 004737 006626 
4412 026576 004737 050244 
4413 
4414 
4415 
4416 
4417 
4418 
4419 
4420 
4421 026602 
4422 026604 005701 
4423 026606 100532 
4424 026610 012777 177776 
4425 026616 012777 004000 
4426 026624 012777 000000 
4427 026632 012777 000017 
4428 026640 012777 000067 
4429 026646 5037 003446 
4430 026652 032777 000200 
4431 026660 001015 
4432 026662 005237 003446 
4433 026666 001371 
4434 026670 005037 003446 
4435 026674 032777 000200 
4436 026702 001 
4437 026704 005237 003446 
4438 026710 001401 
4439 026712 000770 


154564 


154600 


154426 


me 
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137 DOUBLE TEST WITH 2 WORD TRANSFER AND BAI SET 


INC BITCNT : COUNT UP 
BEQ 3$ :BIT IS NOT GOING 'O SET 
35 BR 19$ 
MOV @RHCS1,CS1 :SAVE RHCS1 
MOV @RHWC , WC SAVE WORD COUNT 
MOV @RHBA ,BA : SAVE BUS ADDRESS 
TST R1 71S IT ANR 
BEQ 87$ :NO_IT'S A 70 
CLR BAE CLEAR BAE 
CLR CS3 sCLEAR CS3 
JMP 86$ ; CONTINUE 
87$: MOV @RHBAE ,BAE :SAVE BUS ADDRESS EXTENSION 
MOV @RHCS3,CS3 3SAVE RHCS3 
86$: MOV @RHCS2,CS2 SAV 


7SAVE TESTER STATUS 


MOV @RHER ,ER1 SAVE ERROR REGISTER 
MOV HTDB, 7SAVE TESTER DATA REG 
MOV ar P ;SAVE_MR2 TEST E 
BIT ARDY ,@RHCS1 71S READY SET 
BNE $ sRDY SET CONT. TEST 
ERROR 102 ;READY DID NOT SET 
JSR R7 ,WHYFO SANY ERRORS SET 

1$: BIT ADBL ,@RHCS3 :1S DOUBLE SET 
BEQ 2$ :DBL SET 
ERROR 153 ; DBL we vies _ A 2 WORD TRANSFER 
JSR R7,WHYFO TELL WH 

2$: JSR R7,CLEER : CLEAR ERRORS 


FRO RR CIRCUITO III IOI ITO IO IOI IAI AISA AISI II ISISI ISIS IS ASS IAIAAS. 
i*TEST 40 DBL TEST 2 WORD TRANSFER WITH BAI AND WRITE REV 
3*THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV 
:*WRITE FWD AND REV AND WITH BAI SET IN RHCS2 
:*OPERATION BEING PREFORMED WILL BE PRINTED OUT 
:*IN ERROR MESSAGE. 


idicamcewitens MEO GV ovacceucxacrseverseees 
z2 OE A a eat Mingte hd tk bite etn ee Eee 
TST40: SCOPE 
TST R7 31S IN AN RH11 
BMI TST41 32GET ouT OF TEST 
MOV #-2 ,ARHWC 7SET UP WC t= re WORD 
MOV #EVENAD , @RHBA ;SETUP BUS ADDRESS 
MOV #ZERO, @RHBAE ;SETUP BUS ADDRESS EXTENSION 
MOV #7'BAI ,@RHCS2 DEV VICE 7 
MOV MWRITE6,@RHCS1 ar IT TO WRITE6 
CLR BITCNT CLEAR BIT COUNTER 
18$: BIT #RDY ,@RHCS1 : DY SET 
BNE 3$ :BIT IS SET 
INC BITCNT T UP 
BNE 18$ “NOT FINISHED COUNTING 
CLR BITCNT :GET READY TO DO IT AGAIN 
19$: BIT #RDY ,ARHCS1 218 IT SET YET? 
BNE 3$ sYES 
INC BITCNT : COUNT UP 
BEQ 3$ :BIT IS NOT GOING TO SET 


BR 19$ 


SEQ 0083 





G 7 
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85 
CZRHBF.P11 = 26=JUL=75 10:13 T40 T 2 WORD TRANSFER WITH BAI AND WRITE REV SEQ 0084 
4440 026714 3$: 
4441 026714 017737 154410 003420 MOV @RHCS$1,(S1 ;SAVE RHCS1 
4442 026722 017737 154404 003444 MOV @RHWC , WC : SAVE WORD COUNT 
4443 026730 017737 154400 003414 MOV @RHBA ;BA SAVE BUS ADDRESS 
4444 026736 005701 TST R1 STS IT AN RH11 
4445 026740 001406 BEQ 87$ NO IT’ $A 70 
“4446 026742 005037 003416 CLR BAE [CLEAR BAE 
4447 026746 005037 003424 CLR CS3 :CLEAR CS3 
4448 026752 000137 026772 JMP 86$ > CONT INUE 
4449 026756 017737 154376 003416 87$: MOV @RHBAE ,BAE TSAVE BUS ADDRESS EXTENSION 
4450 026764 017737 154372 003424 MOV @RHCS3.CS3 TSAVE RHCS3 
4451 026772 017737 154342 003422 86$: MOV @RHCS2,CS2 TSAVE CS2 
4452 027000 017737 154336 003432 MOV @RHST ,DS1 TSAVE TESTER STATUS 
4453 027006 017737 154332 003436 MOV @RHER.ER1 TSAVE ERROR REGISTER 
4454 027014 017737 154330 003442 MOV @RHTDA, TDR TSAVE TESTER DATA REG. 
4455 027022 017737 154310 003440 MOV @RHMR2, TC TSAVE MR2 TESTER REG. 
4456 027030 032777 000200 154272 BIT #RDY ,@RHCS1 TIS READY SET 
4457 027036 001003 BNE 1$ [RDY SET CONT. TEST 
4458 027040 104102 ERROR 102 [READY DID NOT SET 
4459 027042 004737 007260 JSR R7, WHYFO ANY ERRORS SET 
4460 027046 032777 002000 154306 18: BIT #DBL ,aRHCS3 71S DOUBLE SET 
4461 027054 001403 BEQ 2$ [DBL SET 
4462 027056 104155 ERROR 155 [DBL DID SET JON A 2 WORD TRANSFER 
4463 027060 004737 007260 JSR R7 ,WHYFO [TELL WHY NO 
4464 027064 004737 006626 2$: JSR R7.CLEER CLEAR ERRORS 
4465 027070 004737 050244 JSR R7.ERRTST : 
4466 est iO TEST 2 Ee Ao.) 
4467 TRTEST 41 DBL TEST 2 WORD TRANSFER ODD ADD. 
4468 :*THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV 
4469 [*WRITE FWD AND REV AND WITH BAI SET IN RHCS2 
4470 :*OPERATION BEING PREFORMED WILL BE PRINTED OUT 
4471 :*IN ERROR MESSAGE . 
Ae | ieee te I EE WG DAR vc tcmakessoeasieasas 
4473 jiunsenedaadianiaitnitiitiananennentaaataadianaaaanitaatitesseens 
4474 027074 000004 TS141: SCOPE 7 
4475 027076 005701 TST R1 :1S_IN AN RH11 
4476 027100 100532 BMI TST42 ::GET OUT OF TEST 
4477 027102 012777 177776 154222 MOV #=2 ,aRHWC :SET UP WC FOR TWO WORD 
4478 027110 012777 006002 154216 MOV #ODDAD , @RHBA :SETUP BUS ADDRESS 
4479 027116 012777 000000 154234 MOV #ZERO, @RHBAE TSETUP BUS ADDRESS EXTENSION 
4480 027124 012777 000007 154206 MOV #7 ,ARHCS2 :DEVICE 7 
4481 027132 012777 000061 154170 MOV WWRITEO, @RHCS1 :TELL IT TO WRITEO 
4482 027140 005037 003446 CLR BITCNT [CLEAR BIT COUNTER 
4483 027144 032777 000200 154156 18$: BIT #RDY, @RHCS1 :IS RDY SET 
4484 027152 001015 BNE 3$ :BIT IS SET 
4485 027154 005237 003446 INC BITCNT [COUNT UP 
4486 027160 001371 : BNE 18$ [NOT FINISHED COUNTING 
4487 027162 005037 003446 CLR BITCNT [GET READY TO DO IT AGAIN 
4488 027166 032777 000200 154134 19$: BIT #RDY ,@RHCS1: SIS IT SET YET? 
4489 027174 001004 BNE 3$ ZYES 
4490 027176 005237 003446 INC BITCNT [COUNT UP 
4491 027202 001401 BEQ 3$ :BIT IS NOT GOING TO SET 
4492 027204 000770 BR 19$ 
4493 027206 3$: 


003420 MOV @RHCS1,CS1 ;SAVE RHCS1 


4494 027206 017737 154116 
154112 003444 MOV @RHWC , WC :SAVE WORD COUNT 


4495 027214 017737 


MASSBUS RH70 AND RH11 se 


CZRHBF P11 26-JUL-79 1 
96 027222 017737 154106 
4497 027230 005701 
98 027232 14 

4499 027234 005037 003416 
4500 027240 005037 003424 
4501 027244 137 027264 
4502 027250 017737 154104 
4503 027256 017737 154100 
4504 027264 017737 154050 
4505 027272 017737 154044 
4506 027300 017737 154040 
4507 027 017737 154036 
4508 027314 017737 154016 
4509 027322 032777 200 
4510 027330 00100 
4511 027332 104102 
4512 027334 004737 007260 
4513 027340 032777 2 
4514 027346 00140 
4515 027350 104156 
4516 027352 004737 007260 
4517 027356 004737 006626 
4518 027362 04737 050244 
4519 
4520 
4521 
4522 
4523 
4524 
4525 
4526 
4527 027 
4528 027370 005701 
4529 027372 100532 
4530 027374 012777 177776 
4531 027402 012777 004000 
4532 027410 012777 000000 
4533 027416 012777 000007 
4534 027424 012777 000067 
4535 027432 005037 003446 
4536 027436 032777 200 
4537 027444 001015 
4538 027446 005237 003446 
4539 027452 001371 
4540 027454 005037 003446 
4541 027460 032777 200 
4542 027466 1 
4543 027470 005237 003446 
4544 027474 001401 
4545 027476 000770 
4546 0275 
4547 027500 017737 153624 
4548 0275 017737 153620 
4549 027514 017737 153614 
4550 027522 005701 
4551 027524 001406 


003414 


154014 


153642 


003420 
003444 
003414 
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141 T 2 WORD TRANSFER ODD ADD. SEQ 0085 


MOY @RHBA ,BA ; SAVE BUS ADDRESS 
TST R1 71S IT AN RH11 
BEQ 87$ :NO_IT'S A 70 
C'R BAE CLEAR BAE 
CLR CS3 sCLEAR CS3 
JMP 86$ ; CONT INUE 

87$: MOV @RHBAE ,BAE :SAVE BUS ADDRESS EXTENSION 
MOV @RHCS3,CS3 ;SAVE RH RHCS3 

86$: MOV @RHCS2,CS2 7 SAVE 
MOV @RHST ,DS1 SSAVE TESTER STATUS 
MOV @RHER ,ER1 TSAVE ERROR REGISTER 
MOV @RHTDB,TDR SAVE TESTER ad REG 
MOV @RHMR2 , TC SAVE MR2 TESTER REG. 
BIT #RDY ,@RHCS1 21S READY SET 

$ :RDY SET CONT. TEST 

ERROR 1 [READY DID NOT SET 
JSR R7 ,WHYFO sANY ERRORS SE 

1$: BIT #DBL , ARHCS3 :1S DOUBLE SET 
BEQ 2$ DBL SET 
ERROR 156 :DBL DID = A A 2 WORD TRANSFER 
JSR R7,WHYFO TELL WHY NO 

2$: JSR R7,CLEER CLEAR ERRORS 


ZDIGUIS OI SIIOISISIOIDISIOIDIDIOIOIDIOIOIDIDIOIOIUICOIOIOIOIDIOIOIOIUIOISIOIOIDITIOIOIOI IOI III III IE 
s*TEST 42 DBL_TEST EVEN ADD. WRITE FwD 
3*THESE TEST CHECK DBL IN RHCS3 gy FWD AND REV 
;*WRITE FWD AND REV AND WITH BAI SET IN RHCS2 
; *OPERATION BEING PREFORMED WILL BE PRINTED OUT 
:*IN ERROR MESSAGE. 


ecccccccccccccecs WTO DEV vc cccccccoccesscosesses 

2 BIE SIO IG ICO IOGIOIUOIIOOIIGGIOGIOOIGII IO III IO Iori itt 
TST42: SCOPE 

TST R1 31S_IN AN RH11 

BMI TST43 ::GET OUT OF TEST 

MOV #-2 ,aRHWC SET UP WC ron TWO WORD 

MOV MEVENAD , @RHBA ;SETUP BUS ADDRESS 

MOV #ZERO,@RHBAE : SETUP BUS ADDRESS EXTENSION 

MOV #7 ,ARHCS2 SDEVICE 7 

MOV MWRITE6,@RHCS1 ;TELL IT TO WRITE6 

CLR BITCNT :CLEAR BIT COUNTER 
18$: BIT ARDY ,ARHCS1 :IS RDY SET 

BNE 3$ :BIT IS SET 

INC BITCNT . : COUNT UP 

BNE 18$ [NOT FINISHED COUNTING 

CLR BITCNT GET READY TO DO IT AGAIN 
19$: BIT #RDY ,ARHCS1 i$ IV SBT VET? 

BNE 3$ 7YES 

INC BITCNT : COUNT UP 

BEQ 3$ :BIT IS NOT GOING TO SET 
35 BR 19$ 

MOV @RHCS1,CS1 ;SAVE RHCS1 

MOV @RHWC , WC SAVE WORD COUNT 

MOV @RHBA ,BA ; SAVE BUS ADDRESS 

TST R1 71S IT AN RH11 


BEQ 87$ NO IT'S A 70 





MASSBUS RH70 AND RH11 2.4 he 


CZRHBF P11 26-JUL=79 10:1 
4552 027526 005037 003416 
4553 027532 005037 003424 
4554 027536 137 027556 
4555 027542 017737 153612 
4556 027550 017737 153606 
4557 027556 017737 153556 
4558 027564 017737 153552 
4559 027572 017737 153546 
4560 027600 017737 153544 
4561 027606 017737 153524 
4562 027614 032777 000200 
4563 027622 001003 
4564 027624 104102 
4565 027626 004737 007260 
4566 027632 032777 2000 
4567 027640 001403 
4568 027642 104157 
4569 027644 004737 007260 
4570 027650 004737 
4571 027654 004737 050244 
4572 
4573 
4574 
4575 
4576 
4577 
4578 
4579 
4580 7660 
4581 027662 005701 
4582 027664 100532 
4583 027666 012777 177776 
4584 027674 012777 004002 
4585 027702 012777 000000 
4586 027710 012777 000007 
4587 027716 012777 000067 
4588 027724 005037 003446 
4589 027 032777 200 
4590 027 001015 
4591 027740 005237 003446 
4592 027744 001371 
4593 027746 005037 003446 
4594 027752 032777 200 
4595 027760 001 
4596 027762 005237 003446 
4597 027766 001401 
4598 027770 7 
4599 027772 
4600 027772 017737 153332 
4601 030000 017737 153326 
4602 030006 017737 153322 
4603 030014 005701 
4604 030016 001406 
4605 030020 005037 003416 
4606 030024 005037 003424 
4607 030030 137 030050 


153522 


153436 


153404 
153372 


153350 


003420 
003444 
003414 
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CLEAR BAE 
CLEAR Cs3 


; CONT INUE 
SAVE ——_ EXTENSION 


; SAVE R 

7SAVE CS2 

; SAVE TESTER STATUS 
:SAVE ERROR REGISTER 

7SAVE TESTER DATA REG. 

7 SAVE aaa TESTER REG. 


sis y nat Y SET 

Y SET CONT. TEST 
READY DID NOT SET 
ZANY ERRORS SET 
z1S a SET 


;DBL DID SET ON A 2 WORD TRANSFER 
;TELL WHY NOT 
[CLEAR ERRORS 


SRE EKKEREEKRKKEEEKEKEAKEREERKEEKEEREKEKERRKRKKKEEKEEREEREKRKEKKEKE 


DBL_TEST 2 WORD ODD ADD. WRITE REV 
3 * THESE ic CHECK DBL_IN RHCS3 WITHREAD FWD AND REV 
WITH BAI SET IN RHCS2 


: *OPERATION BEING PREFORMED WILL BE PRINTED OUT 


BIER III TOO OOOO SOOO TOSS OTOCIIO ICIS IOI III IO: 


i 
MACY11 BSH 26-JUL-79 
T42 T EVEN ADD. WRITE 
CLR BAE 
CLR cs3 
JMP 86$ 
87$: MOV @RHBAE ,BAE 
MOV @RHCS3,CS3 
86$: MOV @RHCS2,CS2 
MOV @RHST, 5S} 
MOV @RHER.ER1 
MOV @RHTDB, TDR 
MOV @RHMR2, TC 
BIT #RDY ,@RHCS1 
BNE 1$ 
... ERROR 102 
JSR R7,WHYFO 
1$: BIT L,@RHCS3 
BEQ 
— 157 
JSR _ R7,WHYFO 
2$: JSR ~ R7,CLEER 
JSR R7,ERRTST 
;*TEST 43 
;*WRITE FWD AND REV AND 
ssIN ERROR MESSAGE. 
ee RH70 ONLY 
18143: SCOPE 
TST R1 ‘ 
BMI TST44 
MOV #-2 ,@RHW 
MOV #ODDAD , ARHBA 
MOV #ZERO, @RHBAE 
MOV # s@RHC 
MOV M#WRITE6, @RHCS1 
CLR BITCNT 
18$: BIT #RDY ,A@RHCS1 
BNE 3$ 
INC BITCNT 
BNE 18$ 
CLR BITCNT 
19$: BIT ARDY ,ARHCS1 
BNE 3$ 
INC BITCNT 
BEQ 3$ 
BR 19$ 
3$: 


MOV @RHCS1,CS1 
MOV — @RHWC WC 
MOV @RHBA ,BA 


TST R1 

BEQ 87$ 
CLR BAE 
CLR CS3 


3:1S_IN AN RH11 


72GET out eT TEST 


T UP WC FOR TWO WORD 
SETUP BUS ADDRESS 
SETUP ~—- ADDRESS EXTENSION 


:DEVICE 

:TELL IT TO WRITE6 
:CLEAR BIT COUNTER 
:1S_RDY SET 

:BIT IS SET 

3 T UP 


;NOT FINISHED COUNTING 
:GET READY TO DO IT AGAIN 
i IT SET YET? 


: COUNT UP 
:BIT IS NOT GOING TO SET 


:SAVE RHCS1 
SAVE WORD COUNT 
2 SAVE ue ee 


SEQ 0086 


7 
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CZRHBF .P11 26-JUL-79 10:13 143 T 2 WORD ODD ADD. WRI TE R 


017737 87$: @RHBAE ,BAE 7 SAVE bo ADDRESS EXTENSION 
86s @RHCS3,CS3 iSAVE R HCS3 


AVE CS2 
‘SAVE TESTER STATUS 
:SAVE ERROR REGISTER 
SAVE TESTER DATA REG. 
; SAVE as Hh Nae REG. 


es 


003440 
153214 
SREADY DID NOT SET 


ANY ERRORS SET 
153230 1$: spot 4+ DOUBLE SET 


:DBL SET 
;DBL DIDN'T SET ON A 2 WORD TRANSFER 
TELL WHY NOT 

2s: [CLEAR ERRORS 


REESESESESS 
OWONAOULSWAR oO 


006626 
050244 
eg ag gE a econ gn Yi cca 
TRTEST 4G DBL_TEST 3 WORD ODD ADD. WRITE REV 
;*THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV 
;*WRITE FWD AND REV AND WITH BAI SET IN RHCS2 
:*OPERATION BEING PREFORMED WILL BE PRINTED OUT 
s*IN ERROR MESSAGE. ™ 


PON eS TON teh Reeth ra here hee ne tn 


15144: 
:1S IN AN RH11 
::GET OUT OF TEST 
177775 Cc 7SET UP WC FOR THREE WORD 
004002 :SETUP BUS ADDRESS 
#ZERO, @RHBAE ‘SETUP BUS ADDRESS EXTENSION 
#7, ARHCS2 sDEVICE 7 
MURITES, @RHCS1 sTELL IT TO WRITE6 
CNT ;CLEAR BIT COUNTER 
71S RDY SET 
:BIT IS SET 
;COUNT UP 
;NOT FINISHED COUNTING 
BITCN :GET READY TO DO IT AGAIN 
153056 19$: ARDY ,@RHCS1 71S IT SET YET? 
3$ YES 
BITCNT 
3$ 
19$ 
003420 @RHCS1,C51 SAVE RHCS1 
003444 @RHWC , WC ;SAVE WOR 
003414 


COUNT UP 
:BIT IS NOT GOING TO SET 


: CONT INUE 
003416 ¢ @RHBAE ,BAE 2 SAVE aS ADDRESS EXTENSION 
003424 ZSAVE RHCS3 

017737 152772 003422 : @RHCS2.CS2 TSAVE CS2 
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CZRHBF P11 26-JUL-79 10:1 T 3 WORD ODD ADD. WRITE REV SEQ 0088 
4664 030350 017737 152766 003432 MOV @RHST ,DS1 SAVE TESTER STATUS 
4665 030356 017737 152762 003436 MOV @RHER ,ER1 SAVE ERROR REGISTER 
4666 030 017737 152760 003442 MOV @RHTDB, TDR SAVE TESTER DATA REG. 
4667 030372 017737 152740 003440 MOV @RHMR2 , TC SAVE _MR2 TESTER REG. 
4668 030400 032777 200 152722 BIT ARDY ,A@RHCS1 :1S READY SET 
4669 030406 001003 BNE . 1$ :RDY SET CONT. TEST 
4670 030410 104102 ERROR 102 READY DID NOT SET 
4671 030412 004737 007260 JSR R7 ,WHYFO ANY ERRORS SET 
4672 030416 032777 002 152736 18: BIT ADBL ,@RHCS3 71S DOUBLE SET 
4673 030424 001403 BEQ 2$ ; SET 
4674 030426 104161 ERROR 161 :DBL DID SET ON A 3 WORD TRANSFER 
4675 030430 004737 007260 JSR R7,WHYFO TELL WHY NOT 
4676 030434 004737 006626 2$: JSR R7,CLEER [CLEAR ERRORS 
4677 030440 004737 050244 JSR R7,ERRTST 
4678 ——Lt uLcsi:mnuae °° °° °€8»©— 
4679 s*TEST 45 DBL_TEST 2 WORD READ F 
4680 :*THESE TEST CHECK DBL IN RMCSS. WITHREAD FWD AND REV 
4681 ;*WRITE FWD AND REV AND WITH BAI SET IN RHCS2 
4682 ;*OPERATION BEING PREFORMED WILL BE PRINTED OUT 
4683 :sIN ERROR MESSAGE. 

$608 PT 8 ee bg etc + PRenesensenesceees H70 Viecccccccccsccccccscccce 
4685 jneeetanididaidinitnitieesnennsstainiaetaininetainititienseees 
4686 030444 TST45: SCOPE 
4687 030446 005701 TST 1 31S_IN_AN RH11 
4688 030450 100532 BMI TST46 32GET our ‘ol TEST 
4689 030452 012777 177776 152652 MOV #-2 , @RHWC T UP WC FOR TWO WORD 
4690 030460 012777 004000 152646 MOV MEVENAD , @RHBA ;SETUP BUS ADDRESS 
4691 0 012777 152664 MOV #ZERO, @RHBAE : SETUP BUS ADDRESS EXTENSION 
4692 030474 012777 7 152636 MOV #7 ,ARHCS2 sDEVICE 7 
4693 030502 012777 71 152620 MOV #READO,@RHCS1 :TELL IT TO READO 
4694 030510 5037 003446 CLR BITCNT [CLEAR BIT COUNTER 
4695 030514 032777 200 152606 18$: BIT ARDY ,@RHCS1 z1S_RDY SET 
4696 030522 001015 BNE 3$ :BIT IS SET 
4697 030524 005237 003446 INC BITCNT : T UP 
4698 0305 001371 BNE $ NOT FINISHED COUNTING 
4699 030532 005037 003446 CLR BITCNT :GET READY TO DO IT AGAIN 
4700 030536 032777 200 152564 19%: BIT #RDY ,@RHCS1 :1S_IT SET YET? 
4701 030 1 BNE 3$ 7 YES 
4702 030 005237 003446 INC BITCNT : COUNT UP 
4703 030552 001401 BEQ 3$ BIT IS NOT GOING TO SET 
4704 0305 770 BR 19$ 
4705 030556 3$: 
4706 030556 017737 152546 003420 MOV @RHCS1,CS1 :SAVE RHCS1 
4707 030564 017737 152542 344 MOV @RHWC , WC SAVE WORD COUNT 
4708 030572 017737 152536 003414 MOV @RHBA, >SAVE BUS ADDRESS 
4709 030600 005701 TST R1 71S IT AN RH11 
4710 030602 001406 BEQ 87$ :NO_IT* S A 70 
4711 030604 005037 003416 CLR BAE :CLEAR BAE 
4712 030610 005037 003424 CLR CS3 :CLEAR CS3 
4713 030614 137 030634 JMP 86$ > CONT INUE 
4714 030620 017737 152534 003416 87$: MOV . > SAVE oe ADDRESS EXTENSION 
4715 030626 017737 152530 003424 MOV @RHCS3,CS3 2 SAV E RHCS3 
4716 030634 017737 152500 003422 86$: MOV @RHCS2,CS2 AVE CS2 
4717 030642 017737 152474 003432 MOV @RHST ,DS SAVE TESTER STATUS 
4718 030650 017737 152470 003436 MOV @RHER ,ER1 SAVE ERROR REGISTER 
4719 030656 017737 152466 003442 MOV @RHTDB, TDR SAVE TESTER DATA REG. 
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CZRHBF .P11 26-JUL-79 10:13 T45 EST 2 WORD READ FwD SEQ 0089 
4720 030664 017737 152446 003440 MOV @RHMR2 , TC 7 SAVE en TESTER REG. 
4721 030672 032777 000200 152430 BIT ARDY ,@RHCS1 71S READY SET 
4722 030700 001003 $ ;RDY SET. CONT. TEST 
4723 030702 104102 ERROR 02 sREADY D 
4724 030704 004737 007260 JSR R7 ,WHYFO sANY ERRORS SET 
4725 030710 032777 002000 152444 1$: BIT #DBL ,@RHCS3 21S DOUBLE SET 
4726 030716 0691003 BNE $ :DBL SET 
4727 030720 104162 ERROR 162 DBL DIDN'T SET ON A 2 WORD TRANSFER 
4728 030722 004737 007260 JSR R7,WHYFO 7 TELL WHY NOT 
4729 030726 004737 006626 2s: JSR R7,CLEER [CLEAR ERRORS 
4730 030732 004737 050244 JSR R7,ERRTST 
4731 SKEKKKEREKEREAEREERAEEEKEREAEEKKKEEEKRERREKEKEKKERERERKEREREEREEKKKEKEKKEK 
4732 TATEST 46 DBL_TEST 2 WORD ODD ADD. READ FWD 
4733 3*THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV 
4734 z*WRITE FWD AND REV AND WITH BAI SET IN RHCS2 
4735 OPERATION BEING PREFORMED WILL BE PRINTED OUT 
4736 ° ssIN ERROR MESSAGE. 
ora ee” es lO . aRecccnnsetesveces PATO GULY .ccvccoccscovcccessoces 
4738 Fe PO Tate Beeb SRE ee eee Le es 
4739 030736 000004 TST46: SCOPE 
4740 030740 005701 TST R1 3:1S_IN AN RH11 
4741 030742 100532 BMI TST47 ::GET OUT OF TEST 
4742 030744 012777 177776 152360 MOV #-2 ,ARHWC SET UP WC FOR TWO WORD 
4743 030752 012777 004002 152354 MOV MODDAD , ARHBA : SETUP BUS ADDRESS 
4744 030760 012777 000000 152372 MOV #ZERO, @RHBAE [SETUP BUS ADDRESS EXTENSION 
4745 030766 012777 000007 152344 MOV #7 ,ARHCS2 :DEVICE 7 
4746 030774 012777 000071 152326 MOV #READO,,@RHCS1 ;TELL_IT TO READO 
4747 031002 005037 003446 CLR BITCNT [CLEAR BIT COUNTER 
4748 031006 032777 000200 152314 18$: BIT ARDY ,@RHCS1 :IS_RDY SET 
4749 031014 001015 BNE 3$ BIT IS SET 
4750 031016 005237 003446 INC BITCNT : COUNT UP 
4751 031022 001371 BNE 18$ ;NOT FINISHED COUNTING 
4752 031024 005037 003446 CLR BITCNT :GET READY TO DO IT AGAIN 
4753 031030 032777 000200 152272 19$: BIT ARDY ,ARHCS1 1S _IT SET YET? 
4754 031036 001004 BNE 3$ svES 
4755 031040 005237 003446 INC BITCNT : COUNT UP 
4756 031044 001401 BEQ 3$ BIT IS NOT GOING TO SET 
4757 031046 000770 BR 19$ 
4758 031050 3$: 
4759 031050 017737 152254 003420 MOV @RHCS1,CS1 zSAVE RHCS1 
4760 031056 017737 152250 003444 MOV @RHWC , WC SAVE WORD COUNT 
4761 031064 017737 152244 003414 MOV @RHBA ,BA SAVE _BUS ADDRESS 
4762 031072 005701 TST R1 71S IT AN RH11 
4763 031074 001406 BEQ 87$ sNO_IT'S A 70 
4764 031076 005037 003416 CLR BAE CLEAR SAE 
4765 031102 005037 3424 CLR CS3 :CLEAR CS3 
4766 031106 1 031126 JMP 86$ ; CONT INUE 
4767 031112 017737 152242 003416 87$: MOV @RHBAE ,BAE SAVE BUS ADDRESS EXTENSION 
4768 031120 017737 152236 003424 MOV @RHCS3,CS3 7SAVE RHCS3 
4769 031126 152206 003422 86$: MOV @RHCS2,CS2 sSAVE CS2 
4770 031134 017737 152202 003432 MOV @RHST ,.DS1 ; SAVE TESTER STATUS 
4771 031142 017737 152176 MOV @RHER,ER1 VE ERROR REGISTER 
4772 031150 017737 152174 003442 MOV @RHTDB, TDR SAVE TESTER DATA REG. 
4773 031156 017737 152154 003440 MOV @RHMR2 , TC 7SAVE MR2 TESTER REG. 
4774 031164 032777 000200 152136 BIT #RDY ,@RHCS1 21S READY SET 
4775 031172 001003 BNE 1$ :RDY SET CONT. TEST 
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CORMBF rer Pit 26-JUL-79 10:13 146 T 2 WORD ODD ADD. READ F 


2 READY DID NOT SET 
007260 ANY ERRORS SET 
002000 152152 : 71S DOUBLE SET 
DBL a? ten ON A 2 WORD TRANSFER 
007260 ;TELL WHY NOT 
006626 2$: ZCLEAR ERRORS 
050244 


DARA IEI SOI IE OIE IOI IDIIOIIOIOIOIIOIIOIIOIOIOIIOISIUIIIOIDIOITII IDOI Tit it 
TEST 47 DBL_TEST 2 WORD EVEN ADD. READ REV 
;* THESE TEST CHECK DBL IN RHCS3 WITHREAD FWD AND REV 
;*WRITE FWD AND REV AND WITH BAI SET IN RHCS2 
: *OPERATION BEING PREFORMED WILL BE PRINTED OUT 
; IN ERROR MESSAGE. 


FDIS ISIS ICICI ICICI IOI IR UII TRAST RR TAA A AAS AS AIA 
TST47: 
31S_IN AN RH11 
BM 3:GET OUT OF TEST 
177776 2066 aRHwWC 7;SET UP WC FOR TWO WORD 
004000 7SETUP BUS ADDRESS 
SETUP BUS ADDRESS EXTENSION 


DEVICE 7 
:TELL_IT TO READ6 
B :CLEAR BIT COUNTER 
152022 : z1S_RDY SET 
BNE :BIT IS SET 
: COUNT UP 
NOT FINISHED COUNTING 
:GET READY TO DO IT AGAIN 
1) SET YET? 


*COUNT UP 
‘BIT IS NOT GOING TO SET 
:SAVE RHCS1 


SAVE WORD COUNT 
: SAVE a & re 


REE 
NMmno— 
OO 


; CONTINUE 

SAVE BUS ADDRESS EXTENSION 

7SAVE RHCS3 

zSAVE CS2 

SAVE TESTER STATUS 

7SAVE ERROR REGISTER 

7SAVE TESTER DATA REG. 

ite Bes MR2 TESTER REG. 

RDY SET CONT. TEST 

102 READY DID NOT SET 
004737 R7 ,WHYFO ANY ERRORS SET 

031474 032777 002000 151660 : #DBL , @RHCS3 21S DOUBLE SET 


MVM Ia 
ot 





CORMBF P11 


031502 001403 
031504 104164 
031506 004737 
031512 004737 
031516 004737 


031522 


SBUS_RH70 AND RH11 gingers ic 
26-JUL=79 10:13 


007260 
006626 
050244 


177776 


os 
Be 
SR ERR 


te ed ed ed ed ed ed 
Sdonenusn ro. 
SONANMNANMEA 


AAAAAAARSS 


NWSE HKHLSN 


S 


151506 


00 
151352 


151366 


MACY11 i 
147 


{EAA EEAERAERHRERREERERRREEREEKREEEERERERERERERERRERRKRRKKE 


7 
26-JUL=79 10:39 PAGE 92 
T 2 WORD EVEN ADD. READ REV 


EQ 2$ 
ERROR 164 
JSR R7,WHYF 
2$: JSR R7,CLEER 
JSR R7,ERRTST 
TRTEST 50 TE 


IN ERROR MESSA 
7§150: SCOPE 
TST R1 
BMI TST51 
MOV #~2, Cc 
MOV M#ODDAD , @RHBA 
MOV #ZERO, @RHBAE 
MOV @RHCS2 
MOV #READG6, @RHCS1 
CLR NT 
18$: BIT #RDY ,@RHCS1 
BNE 
INC BITCNT 
BNE $ 
CLR BITCNT 
19$: BIT #RDY ,@RHCS1 
BNE 3$ 
INC BITCNT 
BEQ 3$ 
BR 19$ 
3$: 
MOV @RHCS1,CS1 
MOV 
MOV e 
TST R1 
BEQ 87$ 
CLR BAE 
CLR cs3 
JMP 86$ 
87$: MOV . 
MOV @RHCS3,CS3 
86$: MOV @RHCS2,CS2 
MOV ST,DS1 
MOV @RHER ,ER1 
MOV @RHTDB, TDR 
MOV 2,1C 
BIT #RDY ,@RHCS1 
BNE 
ERROR 2 
JSR R7, WHYFO 
1$: BIT #DBL ,@RHCS3 
BNE 
ERROR 165 
JSR R7,WHYFO 


DBL SET 
; DBL a ai Da A 2 WORD TRANSFER 


DBL_TEST 2 WORD ODD ADD. READ 
3 * THESE ia M CHECK DBL IN na S3_WITHR 
;*WRITE FWD AND REV AND WITH 
# SOPERATION 1 te ac elaataae WILL BE PRINTED OUT 


BAI 


-RH 
eqpiasbertelbihthTlisseeteranaeabcataebbatiansbasbaeieameess 


;1S_IN_AN RH11 


7 TELL WH 
CLEAR ERRORS 


SET_IN RHCS2 


::GET OUT OF TEST 
:SET 


;SETUP BUS AD 
:DEVICE 7 
;TELL IT TO READ6 
CLEAR BIT COUNTER 
31S RDY SET 
BIT is SET 

T UP 


; COUNT UP 
;BIT IS NOT GOING TO SET 


UP WC aon ree WORD 
7SETUP BUS ADDRESS EXTENSION 


?NOT FINISHED COUNTING 
GET READY TO ge IT AGAIN 


eS IT SET YET? 
;YES 


SAVE RHCS1 


SAVE WORD COUNT 
SAVE BUS i oa 


21S IT 
INO 11*8 4°70 


CLEAR 
‘CLEAR aS 


+ SAVE BUS ADDRESS EXTENSION 


7 SAV Cs 
7SAVE TESTER STATUS 
7 SAV GIST 


READY DID NOT SET 

ANY ERRORS SET 

71S DOUBLE SET 

:DBL SET 

;DBL ore fe ON A 2 WORD TRANSFER 


7 TELL 


REV 
EAD FWD AND REV 


SEQ 0091 


MASSBUS RH70 AND RH11 ey he 
CZRHBF .P11 26-JUL=79 10:13 


32004 004737 


0 006626 
032010 004737 050244 


177775 
004000 


— 
Muni 


MUIMUTUTUT UI 


a i es 26-JUL=-79 48: 739 PAGE 93 
T50 T 2 WORD ODD ADD. READ REV 


2$: JSR R7,CLEER CLEAR ERRORS 
JSR R7,ERRTST 


a gana prey np yg ery penne eerie: 
TATEST 51 DBL_TEST 3 WORD EVEN ADD. READ F 

nite TEST CHECK DBL_IN RHCS3 UI THREAD F FWD AND REV 
z*WRITE FWD AND REV AND WITH BAI SET IN RHCS2 
;*OPERATION BEING PREFORMED WILL BE PRINTED OUT 

;sIN ERROR MESSAG me wav... 


a 
eppusabastachanbsdbackbbeansenaeananbensatelbaelenscebaaaned 


18151: 

31S_IN_AN RH11 
3:GET OUT OF TEST 

SET UP WC FOR THREE WORD 
7SETUP BUS ADDRESS 
SETUP BUS ADDRESS EXTENSION 
;DEVICE 7 
s;TELL_IT TO READO 
[CLEAR BIT COUNTER 
:IS RDY SET 

BIT 

:NOT FINISHED COUNTING 


BITCNT GET READY TO dO IT AGAIN 
ARDY ,ARHCS1 :IS IT SET YET? 

$ ;YES 
BITCNT 
3$ 

19$ 


@RHCS1,CS1 
HWC WC 


: COUNT UP 
:BIT IS NOT GOING TO SET 


003420 
003444 
003414 


;SAVE RHCS1 


; CONT INUE 
SAVE BUS ADDRESS EXTENSION 
7SAVE RHCS3 


SSAVE CS2 

:SAVE TESTER STATUS 

;SAVE ERROR REGISTER 

; SAVE TESTER DATA REG. 

;SAVE MR2 TESTER REG 

; EADY SET 

sRDY SET CONT. TEST 

READY DID NOT SET 

ANY ERRORS SET 

71S DOUBLE SET 

;DBL SET 

: DBL DID SET ON A 3 WORD TRANSFER 
Li WHY NOT 

23: [CLEAR ERRORS 

R7. ERRTST 


PTTTTITITITITITIIITT TTI TI LITT L ITLL TL TLL LL LLL LLL LLL LLL ELLE LLL 


151074 1$: 





MASSBUS RH70 AND RH11 Tay et Mae 
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1 2 
012777 177775 
000 


0 004737 007260 
4994 032570 004737 006626 
184 032574 004737 050244 


150722 


MACY11 a Ne St 26-JUL-79 6. 739 Any Ba 


T52 EST 3 WORD EVEN ADD. READ R 


TEST 52 


DBL_TEST 3 WORD EVEN ADD. READ REV 
3 * THESE ey CHECK DBL_IN RHCS3 WITHREAD FWD AND REV 


: ;#WRI ITE_FWD AND REV AND WITH BAI SET IN RHCS2 
RATION BEING PREFORMED WILL BE PRINTED OUT 


IN ERROR MESSAGE. 


ie RE ONLY 


veo ananae enap etcmaaseneaenc aetna enc mnaamnaa anal bse: 


TST52: SCOPE 
TST 


R1 
BMI TST53 
MOV #-3 , @RHWC 
MOV #EVENAD , @RHBA 
MOV #ZERO, @RHBAE 
MOV #7 ,@RHCS 
MOV WREAD6,,@RHCS1 
CLR BITCNT 

18$: BIT ARDY ,@RHCS1 

BNE 3$ 


INC BITCNT 
BNE 18$ 
CLR BITCNT 


31S_IN AN RH11 


::GET OUT OF TEST 


SET UP _WC FOR oo WORD 
;SETUP BUS ADDRESS 

SETUP BUS ADDRESS EXTENSION 
;DEVICE 7 

:TELL_IT TO READ6 

[CLEAR BIT COUNTER 

:1S_RDY SET 

:BIT IS SET 


[COUNT UP 

NOT FINISHED COUNTING 
:GET READY TO he IT AGAIN 
t+ SET YET? 


: COUNT UP 
:BIT IS NOT GOING TO SET 


3SAVE RHCS1 
SAVE WORD COUNT 
;SAVE_BUS — 


: CONT INUE 
; SAVE a ADDRESS EXTENSION 
: SAVE R HCS3 


CS 
; SAVE TESTER eh 
VE ERROR REGIST 
SAVE TESTER DATA REG. 
SAVE MR2 TESTER REG. 


READY DID NOT SET 
ANY ERRORS SET 
71S DOUBLE SET 


lL SET 
;DBL DIDN'T SET ON A 3 WORD TRANSFER 
7 TELL WHY NUT 
[CLEAR ERRORS 


J EAA REREREEREEREREEREREKKEEEREREEREREERERREERREEKREEERREER ERED 


19$: BIT #RDY ,@RHCS1 
BNE 
INC BITCNT 
BEQ 3$ 
BR 19$ 
3$: 
MOV @RHCS1,CS1 
MOV @RHWC , WC 
MOV @RHBA, 
TST R1 
BEQ 87$ 
CLR BAE 
CLR CS3 
JMP 86$ 
87$: MOV @RHBAE ,BAE 
MOV @RHCS3,CS3 
86$: MOV @RHCS2,CS2 
MOV @RHST,DS1 
MOV @RHER ,ER1 
MOV @RHTDB, TDR 
MOV , 
BIT ARDY ,@RHCS1 
ERROR 102 
JSR R7,WHYFO 
1$: BIT ADBL .@RHCS3 
BNE $ 
ERROR 167 
JSR R7,WHYFO 
2$: JSR R7,CLEER 
JSR R7,ERRTST 
SSTEST 53 WCE EW ERROR 


TEST 
:*THIS TEST CHECKS THAT WCELO WILL SET IN 


:*RHCS3 AND THAT WCE SETS IN RHCS1 


SEQ 0093 
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032600 000004 
5005 032602 012737 000001 
006 
032614 000137 033372 
032620 000007 


5009 
5010 032626 012777 000000 
5011 032634 012777 004000 


5013 032642 013737 004000 
5015 032650 012777 177776 
032656 000061 


5017 032664 005037 003446 
5018 032670 ee 000200 


5020 032700 005237 003446 


5022 032706 005037 003446 
5023 032712 032777 000200 
032720 001004 


5025 032722 005237 003446 


5029 032732 017737 150372 
5030 150366 
5031 032746 017737 150362 
5032 00570 


0 032754 1 
5033 032756 06 
0 32760 005037 003416 
5035 032764 005037 
0 032770 37 033010 
5037 032774 017737 
0. 3002 017737 150354 


5054 
5055 033126 005237 003446 


001212 


150512 
150524 
150472 
004002 


150454 
150444 


150432 


150410 


003420 
003444 
003414 


00 

003442 
003440 
150254 


150236 
150226 
150216 


150204 


dD 8 
oo 30A(1052) owe 10:39 PAGE 95 


;*IT ALSO CHECKS wees WCEHI DCES NOT vty 
or evcscces eecccce ° 


anenentnstocathbbbansakasataasnasebebonselibeanaasnmaupiedbeatn 


31T'S AN RH 
:1T'S AN RH11, EXIT TEST 
;SET DEVICE 


3:D0 1 ITERATION 


3:1S_IT AN RH11 
70 


Vv 7 
;SETUP BUS eonkie EXT. 
;SETUP BUS ADDRESS 


ITITIT IC TITIITI TTT TT TTT LITT IIIT IIIT TTT LTTE LLL LLL 


MAKE BOTH ADD EQUAL 


abn pn = eR tasaR eg ey, 


WCE EW ERROR T 
;*W1TH WCELO INR 
ee eeeeee ee H70 
18153: SCOPE 
MOV #1,$TIMES 
TST R1 
BEQ 1$ 
JMP 
1$: MOV #7 ,ARHCS2 
MOV #ZERO,@RHBAE 
MEVENAD , @RHBA 
CGE MOV EVENAD , ODDAD 
#=~2 , @RHW 
MOV WRI TEO @RHCS1 
CLR BITCNT 
18$: BIT ARDY ,@RHCS1 
BNE MITE 
INC BITCNT 
BNE 18$ 
CLR BITCNT 
19$: BIT ARDY ,ARHCS1 
BNE MITE 
INC BITCNT 
BEQ MITE 
BR 19$ 
MITE: 
MOV @RHCS1,CS1 
MOV @RHWC , WC 
MOV @RHBA ,BA 
TST Ri 
BEQ 87$ 
CLR BAE 
CLR  —¢S3 
JMP 86$ 
87$: MOV @RHBAE ,BAE 
MOV @RHCS3,CS3 
86$: MOV @RHCS2,CS2 
MOV @RHST,DS1 
MOV @RHER ,ER1 
MOV @RHTDB, TDR 
BIT #RDY ,@RHCS1 
E OUS 
ERROR 102 
JSR R7 ,WHYFO 
VOUS: COM VE 
MOV MEVENAD , @RHBA 
MOV #- e a 
MOV #ARCHO, @RHCS1 
CLR BITCNT 
18$: BIT ARDY ,@RHCS1 
BNE 


INC BITCNT 


FOR TWO WORD TRANSFER 
TELL IT TO WRITE 
CLEAR was COUNTER 
:1S_RDY SET 

:BIT IS SET 

; COUNT 


3 UP 
NOT FINISHED COUNTING 
:GET 


READY TO > IT AGAIN 
4 SET YET? 


: COUNT UP 
:BIT IS NOT GOING TO SET 


;SAVE RHCS1 
A 


CONT NUE 
SAVE BUS ADDRESS EXTENSION 
SAVE RHCS3 
sSAVE CS2 
7SAVE TESTER STATUS 

E STER 


: SAVE REGI 

2 SAVE TESTER DATA REG. 
SAVE MR2 TESTER REG. 

IS READY SET 


SEQ 0094 


E 8 
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CZRHBF .P11 26-JUL-79 10:13 T53 WCE EW ERROR TEST SEQ 0095 
5056 033132 0017371 BNE 18$ sNOT FINISHED COUNTING 
5057 033134 005037 003446 CLR BITCNT GET READY TO x IT AGAIN 
5058 033140 032777 000200 150162 19S: BIT #RDY ,@RHCS1 :1S IT SET YET? 

5059 033146 001004 BNE FAST 7 YES 

5060 033150 005237 003446 INC BITCNT ; COUNT UP 

5061 033154 001401 BEQ FAST :BIT IS NOT GOING TO SET 
5062 033156 000770 BR 19$ 

5063 033160 FAST: 

5064 033160 017737 150144 003420 MOV @RHCS1,CS1 7 SAVE RHCS1 

5065 033166 017737 150140 003444 MOV @RHWC , WC ;SAVE WORD COUNT 

5066 033174 017737 150134 003414 MOV @RHBA ,BA ;SAVE BUS ADDRESS 

5067 033202 005701 TST R1 :1S IT AN RH11 

5068 033204 001406 BEQ 87$ iNO IT'S A 70 

5069 033206 005037 003416 CLR BAE ;CLEAR BAE 

5070 033212 005037 003424 CLR CS3 ;CLEAR CS3 

5071 033216 000137 033236 JMP 86$ 3 INUE 

5072 033222 017737 150132 003416 87$: MOV @RHBAE ,BAE + SAVE BUS ADDRESS EXTENSION 
5072 033230 017737 150126 003424 MOV @RHCS3,CS3 SAVE RHCS3 

5074 033236 017737 150076 003422 86$: MOV @RHCS2,CS2 SAVE CS2 

5075 033244 017737 150072 003432 MOV @RHST ,DS1 TSAVE TESTER STATUS 

5076 033252 017737 150066 003436 MOV @RHER ,ER1 + SAVE ERROR REGISTER 
5077 0353260 017737 150064 003442 MOV @RHTDB, TDR + SAVE TESTER DATA REG. 
5078 035266 017737 150044 003440 MOV @RH*R2 , TC 7SAVE MR2 TESTER REG. 
5079 033274 032777 000200 150026 BIT #RDY ,@RHCS1 71S READY SET 

5080 033302 001003 BNE SUPER sRDY IS SET 

5081 033304 104102 ERROR 102 zRDY DID NOT SET 

5082 033306 004737 007260 JSR R7,WHYFO ANY ERRORS SET 

5083 033312 032777 004000 150042 SUPER: BIT ~- #WCELO,@RHCS3 71S WCELO SET 

5084 033320 001006 BNE RITEON sWCELO IS SET 

5085 033322 104132 ERROR 132 ;WCELO DID NOT SET IN RHCS3 
5086 033324 004737 007260 JSR R7 ,WHYFO TANY ERRORS SET 

5087 033330 105737 001103 TSTB SERFLG sWAS THERE AN ERROR 
5088 033334 00 BNE TWANG ; YES 

5089 033336 032777 010000 150016 RITEON: BIT MWCEHI ,@RHCS3 71S WCEHI SET 

5090 033344 001406 BEQ TWANGY SWCEHI DID NOT SET 

5091 033346 104133 ERROR 133 sWCEHI] SET WITH WCELO 
5092 033350 032777 040000 147762 TWANG: BIT MWCE ,@RHCS2 :DID WCE SET IN CS2 

5093 033356 001001 BNE TWANGY 7YES,IT SHOULD BE 

5094 033360 104134 ERROR 134 WCE DID NOT SET IN RHCS2 
5095 033362 004737 006626 TWANGY: JSR R7,CLEER ;CLEAR ERRORS 

5096 033366 004737 050244 JSR R7,ERRTST 

5097 033372 FANG: 

5098 ORI III UIC IDIUIOIOIIOIOIIIOIOIOIIOIOII TOI OTTO OTTO TOTTI TE 
5099 T*TEST 54 WCE OW ERROR TEST (WCEHI) 

5100 ’ drbin gl TEST CHECKS THAT WCEHI SETS IN nae 

5101 ;*AND THAT WCE SETS IN RHCS1 ,IT ALSO TESTS 

5102 THAT WCELO DOES NOT al WIT H MENS cdcnccas 

|, eee oe ee ee a ee ee Ee GUY. siccsnessceoieounes 

5104 : seemunanatteleattbatieastesatabbbesbalbabebabeblassmennehenia 
5105 033372 000004 T5754: SCOPE 

5106 033374 005701 TST R1 71S_IT AN 11 OR A 70 
5107 033376 001402 BEQ 1$ 71T'S AN RH70 

5108 0334 000137 034176 JMP F ANGY 71T°S AN RH11, EXIT TEST 

5109 033404 012777 000007 147726 1$: MOV #7 ,ARHCS2 + A DEVICE 7 

5110 033412 012777 177776 147712 MOV #-2 , ARHWC TWO WORD TRANSFER 

5111 033420 012777 004000 147706 MOV MEVENAD , @RHBA 7SE TUP BUS ADDRESS 


F 8 
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013737 004000 ODDAD , EVENAD ;DUP ODDAD 
000061 147666 #WRITEO,@RHCS1 ;TELL IT’ TO WRITE 
BITCNT ;CLEAR BIT COUNTER 
147654 : ARDY ,@RHCS1 :IS RDY SET 
WCEOWT sBIT IS SET 


BITCNT ; COUNT UP 

18$ ;NOT FINISHED COUNTING 

BITCNT GET READY TO DO IT AGAIN 
147632 : #RDY ,ARHCS1 :1S_IT SET YET? 

WCEOWT S 


BITCNT ; COUNT UP 
= :BIT IS NOT GOING TO SET 


003420 MO @RHCS1,CS1 ;SAVE RHCS1 
003444 HW WC SAVE WORD COUNT 
003414 HBA ,BA SAVE BUS ADDRESS 
31S IT AN RHI 
:NO_IT'S A 70 
CLEAR BAE 
CLEAR CS3 
: CONT INUE 
;SAVE BUS ADDRESS EXTENSION 
2 SAVE R RHCS3 
SAVE CS2 
“SAVE TESTER STATUS 
SAVE ERROR REGISTER 
SAVE TESTER DATA REG. 
HMR? , TC ;SAVE MR2 TESTER REG. 
147476 1S READY SET 
BEAU :RDY IS SET 
zRDY DID NOT SET 
J R7 ,WHYFO 7 ANY ERRORS SET 
147470 : e :DO A CONTROLLER CLEAR 
L TCNT ;SET UP FOR DELAY 


uw 
= 
~ 
Nm 


ee a a ee ee ee ee a eee 
SERRE BRWWWWA MNMNMMNNNNN ae ea es es es 


7$ ‘ 
147450 :SELECT UNIT #7 
; REVERSE BITS IN ODDAD 
147432 “CORRECT BUS ADDRESS 
147422 #~2, ARHWC SCORRECT WC 
147412 e STELL IT TO WRITE CHECK 
BITCNT PLT COUNT ER 


an ant aad an 
HRRRL 
ONOW 


CLEAR 
147400 : 71S _RDY 
:BIT IS SET 
UP 


> COUNT 
=NOT FINISHED COUNTING 
: BITCNT IGET READY TO DO IT AGAIN 
147356 , SIS IT SET YET? 
BNE WCEERR = YES 


; COUNT UP 
;BIT IS NOT GOING TO SET 


BR 
WCEERR: 
017737 003420 MO @RHCS1,CS1 ;SAVE RHCS1 
033772 017737 003444 @RHWC , WC ;SAVE WORD COUNT 


RARER ISSSNKALAN LSS 


5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
5 
6 
5 


ts SS Ss Ss as 3) — -s Ss —) 6 ss Ss 3 


oO 
N 
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CZRHBF .P11 


DU PVP PV DVD SVUDV SV SVS ST SVS SISTA III IIT 
a ek ek at ot od 2d 2 Ss = SS 2 SS Ss SS SS SS SS SS Ss SS SS tS SS SY SYS SS SS 
DOM 0 P00 0 0.00 90.00 90.00 G0 00 00 09 9 YW INIISINNNOS 

BLKRRASLESELEALATALSIHVAARANAISSE ° 


5199 
200 


26-JUL-79 
017737 
005701 


10:13 
147330 


006626 
050244 


000007 
004000 


177776 
003446 
000200 


003446 


003414 


147222 


147236 


147212 


147156 


147132 
147120 


147022 


alr ee tere 


87$: 
86$: 


ERTIP: 


BUSH: 


E 
LEFOUT: 


LEAGUE : 


FANGY: 


G 
26-JUL=79 


@RHBA ,BA 


@RHBAE ,BAE 
@RHCS3,CS3 
@RHCS2,CS2 
@RHST ,DS1 
@RHER ,ER1 
@RHTDB, TDR 
@RHMR2 , TC 
ARDY ,ARHCS1 
ERTIP 

102 
R7,WHYFO 
MWCEHI , ARHCS3 
BUSH 

135 

R7 ,WHYFO 
SERFLG 
LEAGUE 
MWCELO, @RHCS3 
LEAGUE 

137 

MWCE ,@RHCS2 
LEAGUE 

136 
R7,CLEER 
R7,ERRTST 


8 
10:39 PAGE 98 
OW ERROR TEST (WCEHI) 


;SAVE BUS ADDRESS 
31S IT AN RH11 
sNO IT'S A 70 
;CLEAR BAE 

sCLEAR CS3 

; CONTINUE 


;SAVE BUS ADDRESS EXTENSION 
AVE RHCS3 


CS2 
SAVE TESTER STATUS 
; SAVE ERROR REGISTER 
Sr} TESTER DATA REG. 
E MR2 TESTER REG. 
at VREADY Y SET 


31S WCEHI SET 

SWCEHI IS SET 

;WCEHI DID NOT SET IN RHCS3 
zANY OTHER ERRORS SET 

: WAS THERE AN ERROR 


> YES 

31S te SET 
;NO,WCELO IS OK 
:WCELO tM hin WCEHI 


IN RHCS2 
:WCE DID NOT SET IN RHCS2 
CLEAR ERRORS 


DLE 


s*TEST 55 


TST55: 


READY: 


2$: 
18$: 


INTERUPT ENABLE TEST 


2 *THIS TEST VERIFYS THAT IE WILL SET IN RHCS1 
;*AND IT WILL CAUSE AN INTERUPT WHEN RDY IS SET 


PETITI TITTLE LE 


SCOPE 


* #7 ,ARHCS2 
MEVENAD , @RHBA 


#ZERO, @RHBAE 
MIETST ,@VECADD 
#340, us 


MIE ,aR 
2$ 


174 
4177776 
BITCNT 
ARDY ,ARHCS1 
TSTIE 


BITCNT 
18$ 


#~1 ,@RHW 
mniteorie, ,@RHCS1 


;SETUP UNIT NUMBER 
;SETUP BUS ADDRESS 
;RH11 OR RH70 ? 

;1TS AN RH11 

7ZERO THE BAE 

:SET UP VECTOR ADDRESS 
sSET PRIORTY 7 


3SET FOR ONE 


WORD 
sTELL IT TO WRITE 
71S _ IE SET 
YES CONTINUE TEST 
7:1E WILL NOT SET 


;CLEAR BIT COUNTER 
:I1S_RDY SET 
:BIT IS SET 


> COUNT UP 
NOT FINISHED COUNTING 


SEQ 0097 


MASSBUS RH70 AND RH11_DIAGNOSTIC 


CZRHBF .P11 


26-JUL-79 10:13 


022626 


ate thle tte 


003446 
000200 


003446 


146762 
146756 
146752 


003416 
4 


034522 
001103 


034522 


147000 


003420 


146644 


MACY11 30A(1052) 


C 
T55 


19$: 


TSTIE: 


87$: 
86$: 


1$: 


IETST: 


H 
26-JUL=79 
INTERUPT ENABLF TEST 


BITCNT 
ARDY ,@RHCS1 
TSTIE 
BITCNT 


TSTIE 
19$ 


@RHCS1,CS1 
@RHWC , WC 
@RHBA ,BA 


86$ 

@RHBAE ,BAE 
@RHCS3,CS3 
@RHCS2,CS2 


SPI_IT 
(SP) +, (SP) + 


8 
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;GET READY TO DO IT AGAIN 
1S IT SET YET? 


: COUNT UP 
:BIT IS NOT GOING TO SET 


:SAVE RHCS1 

SAVE WORD COUNT 

; SAVE BUS ADDRESS 
IT AN RH11 


TINUE 
“SAVE BUS ADDRESS EXTENSION 
;SAVE RHCS3 


7SAVE CS2 

:SAVE TESTER STATUS 
SAVE ERROR REGISTER 
SAVE TESTER DATA REG. 
SAVE MR2 TESTER REG. 
Maal SET ? 


[READY DID NOT SET 
EST 


XIT TEST 
RDY DID NOT CAUSE AN INTERUPT 
TEXIT TEST 
CORRECT STACK 


SEQ 0098 


I & 
MASSBUS RH70 AND RH11 ay yt he MACY11 30A(1052) aay ned 10:39 PAGE 100 


CZRHBF P11 26-JUL=79 10:13 155 INTERUPT ENABLE TEST / SEQ 0099 
5255 034512 105737 001103 TSTB SERFLG DID IE SET 
5256 034516 001401 BEQ SPLIT YES, EXIT TEST 
5257 034520 104175 ERROR 175 IE HAS OPEN GOING TO BUS 
5258 034522 004737 006626 SPLIT: JSR R7,CLEER =~ © ~ «m ;CLEAR ERRORS 


5259 034526 004737 050244 JSR R7,ERRTST 


ee ee 





8 
MASSBUS RH70 AND RH11 aon ihe MACY11 30A(1052) 26-JUL-79" 10:39 +y* 101 
CZRHBF .P11 26-JUL=79 10:13 156 READ OPERATIONAL TEST (NORMAL) SEQ 0100 


LRA RARER ERE EERE ERR ERR RRR Ree 
i*TEST 56 READ OPERATIONAL TEST (NORMAL) #1 
7* THESE TESTS VERIFY ALL “ay * AND WRITE CODES 
;*WHETHER IT BE A READ REV. FWD OR A WRITE REV. OR FWD 
:*DURING THESE TESTS Ly. 4 TESTER TIMING IS MARGINED AND 
7*NO ERRORS SHOULD OCCUR 


WeRAAAAASAAAALLALAAALALAAALELELLALAALARAS ASE SES RARER REEL AR SERS SS 


TST56: 
#7 ,ARHCS2 ;SETUP UNIT SEVEN 
4-1 ,@RHWC sFOR ONE WORD 


ARBUF , ARHBA ;SRTUP BA 
A#ZERO,RBUF SETUP DATA 
#0AB , ARHTDB sSETUP TESTER DB 
;IS IT AN 11 OR A 70 


‘1 
1$ [IT'S AN RH11 
AZERO, @RHBAE *ZERO BAE . 
#READO, ARHCS1 ‘TELL IT TO READO 
TCNT ; CLEAR BIT COUNTER 


: COUNT UP 

NOT FINISHED COUNTING 
BITCNT :GET READY TO DO IT AGAIN 
tains sI3_ 17 SET VET? 
BITCNT 
2$ 
19$ 


003420 @RHCS1,CS1 :SAVE RHCS1 
003444 CWC *SAVE WORD COUNT 
003414 @RHBA.BA : SAVE Bus ADDRESS 


; COUNT UP 
;BIT IS NOT GOING TO SET 


: CONT INUE 
SAVE BUS ADDRESS EXTENSION 
;SAVE RHCS5 


zSAVE CS2 
: SAVE 3M sy STATUS 


146320 


T 
146322 : MP RBUF “DID INFO GET WRITTEN OR READ 
4$ sie GOT LOADED 


: RBUF = 

:YES INFO DID NOT LOAD 

sALL_ BITS DID of LOAD DURING 
7AN READO “— TION 





8 
MASSBUS RH70 AND RH11 te | he MACY11 yy t 26-JUL- -79 * 39 fy * 102 
CZRHBF .P11 26-JUL-79 10:13 T56 AD OPERATIONAL TEST (NORMAL) SEQ 0101 


035046 4$ sEXIT TEST 
5$: 150 ;READO OPERATION DID NOT WORK 
;NO BITS WHERE LOADED TO RBUF 
007260 4$: J R7 ,WHYFO RORS SET 


001103 SERFLG 
6$ 7NO, EXIT TEST 
136 [PRINT REGISTERS 


70 
035064 006626 6$: R7,CLEER ;CLEAR ERRORS 
035070 050244 R7,ERRTST 
ORAS IOI ISI IDISISISIOIDIOIOISIIOIOIOISIOIOIIOIIOIIIIOIIOIIOIOI OID IDI IOI IOI IIE 
TEST 57 RH OPERATIONAL WRITE TEST #1 
;*THESE TESTS VERIFY ALL READ AND WRITE CODES 
;*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. pl FWD 
:*DURING THESE TESTS Lg 3 TESTER TIMING IS MARGINED AND 
;*NO ERRORS SHOULD OCCUR 


ZL UISO ISOC SISISISISISIOIOISIOISIOTOIIOIOIUIOIOIOIUIOIOIOIIOI IOI OI TOIT OI TOT TT OT TO OT TSI OIE 
035074 000004 TST57: 
000007 146234 MOV #7 ,ARHCS2 SETUP UNIT SEVEN — 
125252 004000 MOAB ,EVENAD SETUP INFORMATION 
000003 146234 #DMD !MCLK , @RHMR1 SETUP DIAG. MODE 
177777 +=146204 MO #~1 ,aRHWC 3FOR ONE WORD 
R1 :1S_1T A 11 OR 70 


1$ z1T'S AN 11 
146220 AZERO, @RHBAE :ZERO BAE 


MEVENAD , @RHBA : SETUP BA 
MWRITEO,@RHCS1 sTELL_ IT TO WRITETO 
#DMD , @RHMR1 ;MAN PULATE 


146172 


BITCNT 
: BITCNT INCREMENT LOOP COUNTE 
003446 MP #15 ,BITCNT 71S 1T THIRD LOOP FOR SuseC WAIT 
2s NO LOOP AGAIN 
146144 #DMD !MCLK ,@RHMR1 START CHANGING CLOCK 
ADMD, ;CHANGE CLOCK AGAIN 
ADMD !MCLK , @RHMR1 CHANGE CLOCK AGAIN 
#DMD , @RHMR 1 ;CHANGE CLOCK AGAIN 
146114 #ZERO, @RHMR1 7GET OUT OF DIAG MODE 
TCNT [CLEAR BIT COUNTER 
146056 : :IS_RDY SET 
7$ :BIT IS SET 


: COUNT UP 
:NOT FINISHED COUNTING 
BITCNT :GET READY TO IT AGAIN 
146034 : 4S SET YET? 


: COUNT UP 
:BIT IS NOT GOING TO SET 


SAVE RHCS1 

SAVE WORD COUNT 
SAVE BUS ADDRESS 
71S IT AN RH11 
:NO_IT'S A 70 
CLEAR BAE 
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MASSBUS RH70 AND RH11 Bee TIC MACY11 y tpi eet 26-JUL-79 10:39 PAGE 103 
CZRHBF .P11 26-JUL-79 10:1 157 RATIONAL WRITE TEST #1 SEQ 0102 


CS3 sCLEAR CS3 


86$ > CONT INUE 
@RHBAE ,BAE ; SAVE om ADDRESS EXTENSION 
@RHCS3,CS3 ;SAVE R HCS3 
@RHCS2,CS2 2 SAV 
@RHST ,DS1 7SAVE TESTER STATUS 
@RHER ,ER1 sSAVE ERROR REGISTER 
@RHTDB, TDR SAVE TESTER oen REG. 
@RHMR2, TC 7SAVE MR2 TESTER REG. 
001162 @RHTDB, SREGO ;GET DA ATA 
145672 pcan 71S READY SET 


145662 : ‘DID WC INCREMENT 
BNE 3$ Mail CONT TEST 


WRITETO OPERATION DID NOT INC WC 
145652 REMENT 


141 NOT INCREMENT AFTER AN WRITETO OPERATION 
145654 : MP nee DID cont WRITETO TESTER 


142 SINFO DID NOT WRITETO TESTER 
R7,,WHYFO TARE ANY ERROR BITS SET 
SERFLG [WAS THER AN ERROR 
6$ NO EXIT TEST 
146 [THESE ARE THE CONTENTS OF ALL RH70 REG. 
170 ZTHIS IS TO COMMPLETE ERROR PRINTOUT 
004737 00662 6$: R7,CLEER SCLEER ERRORS IF ANY 
035522 050244 R7.ERRTST 
J RRA EEEKEKREEKEEKEEKEEKEEEEEEREKEKEEEEKEEKEEREEERKEKEREKK 
TATEST 60 READ OPERATIONAL TEST (NORMAL) W2 
;*THESE TESTS VERIFY ALL READ AND WRITE CODES 
*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. OR FD 
[*DURING THESE TESTS THE TESTER TIMING I$ MARGINED AND 
[*NO ERRORS SHOULD OCCUR 


JF RARER AEEEREEEEEKEEKEEKEEREEREKEKEKKEEREKKEKEEERKEKEKKE 


035526 000004 TST60: 
#7 ,@RHCS2 ;SETUP UNIT SEVEN 
#~1 , ARHWC “FOR ONE WORD 
ARBUF , ARHBA 
#2ZERO,RBUF 
#0AB, @RHTDB 


° 


1$ 
#ZERO, ARHBAE ZERO BAE 
#READZ, @RHCS1 ‘TELL IT TO READ2 
BITCN [CLEAR BIT COUNTER 
#RDY, aRHCS! [IS RDY SET 
:BIT IS SET 
BITCNT T UP 
18$ ‘NOT FINISHED COUNTING 
BITCNT ‘GET READY TO DO IT AGAIN 
#RDY ,@RHCS1 :18 IT SET YET? 


BITCNT ‘COUNT UP 


LELELELELELY 
BSavanRN= 





8 
SBUS_RH70 AND RH11 dey ont MACY11 30A(1052) 26-JUL-79. 10:39 +y 104 ’ 
CORMEF; rer Pt 26-JUL=79 10:13 T60 READ OPERATIONAL TEST (NORMAL) #2 SEQ 0103 


001401 2$ ;BIT IS NOT GOING TO SET 
000770 BR 19$ 


017737 145450 4 @RHCS1,CS1 :SAVE RHCS1 
145444 003444 @RHWC , WC SSAVE WORD COUNT 
145440 QRHBA BA > SAVE BUS ADDRESS 


: CONT INUE 
SAVE BUS ADDRESS EXTENSION 
2 SAVE RHCS3 


cS 
7SAVE TESTER STATUS 
:SAVE ERROR REGISTER 
7SAVE TESTER DATA REG. 
@RHMR2 TC 7SAVE MR2 re REG. 
001162 @RHTDB , $REGO hall DAT. 
145324 ARDY ,@RHCS1 :1S OR SET 
3$ :YES RDY IS SET 
sREADY ae NOT SET 
Y ERRORS SET 
145326 : T :DID INFO GET WRITTEN OR READ 
4$ INFO GOT LOADED 


RBUF = 0 
YES INFO DID NOT LOAD 
zALL_BITS DID NOT LOAD DURING 
zAN _READ2 OPERATION 
ZEXIT TEST 
;READ2 OPERATION DID NOT WORK 
ZNO BITS WHERE LOADED TO RBUF 
ZANY ERRORS SET 
zANY ERRORS ? 
:NO,EXIT TEST 
:PRINT REGISTERS 


17 
6$: CLEAR ERRORS 
ERR 


Ce ge aoa eager ge nn ar - anaaan ae a aattenenitae ity 
:*TEST 61 READ OPERATIONAL TEST #1 
;*THESE TESTS VERIFY ALL READ AND win CODES 
;*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. i. FWD 
: *DURING THESE TESTS THE TESTER TIMING IS MARGINED AND 
:*NO ERRORS SHOULD OCCUR 


: FEAF REE EAEKEEEEKEERKEEREKEKEKEKEKEKKEREREEEEEREREREAERE EERE E RE 


TST61: 
000007 #7 ,A@RHCS2 SETUP UNIT SEVEN 

052525 #AB ,@RHTDB ;SETUP INFORMATION 
000003 ADMD !MCLK , @RHMR1 SETUP DIAG. MODE 
177777 #~1 ,@RHWC 2f D 


006626 
050244 


1$ 
000000 #7ERO,@RHBAE 
012777 004000 : #EVENAD , @RHBA 





8 
MASSBUS RH70 AND RH11_DIAGNOSTIC MACY11 30A(1052) 26-JUL=79" ys 39 PAGE 105 
CZRHBF P11 26-JUL=79 10:1 161 READ OPERATIONAL TEST # SEQ 0104 


#READO, @RHCS1 ;TELL_IT TO READFROM 
#DMD , @RHMR 1 ;MANIPULAT E CLOCK 
BITCNT CLEAR LOOP COUNT 

BITCNT INCREMENT LOOP COUNTER 

#15 ,BITCNT 71S IT THIRD LOOP FOR SUSEC WAIT 
2$ NO LOOP rar 


#DMD !MCLK , @RHMR1 zSTAR of ~~ es CLOCK 


ADMD , ;CHANGE CLOCK AGAIN 
#DMD !MCLK , @RHMR1 iC 
#DMD 1 3 CHANGE CLOCK 


[CLEAR BIT COUNTER 
71S RDY SET 

BIT IS SET 

: COUNT UP 


NOT FINISHED COUNTING 
BITCNT GET READY TO dO IT AGAIN 
ARDY ,ARHCS1 31S IT SET YET? 

7 YES 
BITCNT 
7$ 
19$ 


145022 ; @RHCS1,CS1 :SAVE RKCS1 
145016 @RHWC , WC = SA 
145012 QRHBA “BA 

87$ 


BAE 
CS3 
86$ 


COUNT UP 
:BIT IS NOT GOING TO SET 


; CONT INUE 
@RHBAE ,BAE 2 SAVE BUS ADDRESS EXTENSION 
@RHCS3,CS3 VE RHCS3 
@RHCS2,CS2 


sSAVE CS2 

7SAVE TESTER STATUS 
2SAVE ERROR REGISTER 

+ SAVE TESTER DATA REG. 
3SAVE MR2 ad REG. 


144676 


177777 144666 


TEST 
1 ADF ROM Anal DID NOT INC WC 
004002 144656 : MP 7. ie BA INCREMENT 


CONT TEST 
144 BA DID NOT INCREMENT AFTER AN READFROM OPERATIO 
004000 144660 : MP ey DID ton READFROM TESTER 


; INFO Ay NOT READFROM TESTER 
7 aise S SET 


este 
; THESE ARE THE CONTENTS OF ALL RH70 REG. 
THIS IS TO COMMPLETE ERROR PRINTOUT 
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S_RH70 AND RH11 Ty TIC MACY11 30A(1052) 26=JUL-79 ys 39 PAGE 106 
CORB: Sit 26-JUL=79 10:1 761 READ OPERATIONAL TEST # SEQ 0105 


036512 004737 006626 6$: JSR CLEER ;CLEER ERRORS IF ANY 
036516 004737 050244 JSR A ERRTST 
Pirie igi iii iii iit iitiiiitiititiitiiiii 
TATEST 62 READ OPERATIONAL TEST (NORMAL) #3 
;*THESE TESTS VERIFY ALL READ AND wy CODES 
;*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. y ise 
:*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND 
7*NO ERRORS SHOULD OCCUR 


—mAAARAAAAALALALALASALLALALLSLALASESL SEES ERE SESS RE REE RRR ESSE SG 


1162: 
#7 @RHCS2 ;SETUP UNIT SEVEN 
#-1, @RHW ‘FOR ONE WORD 


PRBUF aR SRHBA ;SRTUP BA 

#ZERO ,RBUF SETUP DATA 

MOAB , @RHTDB SETUP TESTER DB 

R 71S _IT AN 11 OR A 70 
1$ 31T'S AN RH11 

ZERO, @RHBAE ZERO BAE 

WREADS ,@RHCS1 STELL IT TO READ4 
BITCNT ; CLEAR BIT COUNTER 
eet RDY SET 


‘BIT IS SET 
BITCNT : COUNT UP 
18$ NOT FINISHED COUNTING 
BITCNT GET READY TO ~ IT AGAIN 
lett 1S SET YET? 


BITCNT 
2$ 
19$ 
144454 @RHCS1,CS1 7SAVE RHCS1 
144450 @RHWC , WC SAVE WORD COUNT 
144444 @RHBA ,BA : SAVE BUS ADDRESS 
R1 31S 1T AN RH11 
87$ :NO_IT'S A 70 
BAE CLEAR BAE 
CS3 TCLEAR CS3 
; CONT INUE 
@RHBAE ,BAE ; SAVE on, ADDRESS EXTENSION 
@RHCS3,CS3 2 SAVE Ri HCS3 
@RHCS2,CS2 VE CS 
; SAVE TESTER STATUS 
VE ERR GISTER 
‘SAVE TESTER DATA REG. 
;SAVE MR2 TESTER REG. 
; DATA 
21S OR SET 
YES RDY IS SET 
ADY DID NOT SET 


zARE ANY ERRORS SET 
144332 : RBUF ,@R :DID INFO GET WRITTEN OR READ 
4$ HA GOT LOADED 


5594 : RBUF = 
5595 037034 YES INFO DID NOT LOAD 


DAVAAAAA MANLY w 
Ba ey a ete a 
WBNAUSWN—O”O Oo 


RATE 


PPA ASIA ASIII IVI 
FERS 


; COUNT UP 
:BIT IS NOT GOING TO SET 


124530 





MASSBUS RH70 AND RH11_DIAGNOSTIC 
CZRHBF .P11 10:13 


037026 


26~-JUL-79 


104147 


037036 


007260 
001103 


006626 
050244 


MACY11 "toe ae 26-JUL=79 
T62 AD OPERATIONAL TEST (NORMAL) 


ERROR 147 
JMP 4$ 

5$: ERROR 150 

4$: JSR R7 ,WHYFO 
TSTB SERFLG 
BEQ 6$ 
ERROR 146 
ERROR 170 

6$: JSR R7,CLEER 


JSR R7,ERRTST 


10:39 Vy en 


sALL_BITS DID NOT LOAD DURING 

ete test OPERATION 

#READ4 OPERATION DID NOT WORK 
D RBUF 


:NO,EXIT TEST 
PRINT REGISTERS 


CLEAR ERRORS 


SEQ 0106 


MASSBUS RH70 AND RH11 rsh 


CZRHBF P11 26-JUL=79 


5 
5616 037064 000004 


MACY11 30A(1052)_ 26=JUL=79 10:39 PAGE 108 
163 RH OPERATIONAL WRITE TEST #2 


aa an menue ae ee 
TRTEST 63 H OPERATIONAL WRITE TEST #2 
; * THESE Fests ay ALL READ AND WRITE CODES 
S*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. OR FWD 
:*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND 
;*NO ERRORS SHOULD OCCUR 


s RARRAKRERARAAAERARERRRARRRRARERERKERERREARRRERHEREREAERAERHERRERED 


TST63: SCOPE 


SEQ 0107 


MASSBUS RH70 AND RH11_DIAGNOSTIC 


CZRHBF .P11 


037454 


26-JUL-79 
012777 


10:13 


144026 
144022 
144016 


177777 


004002 


144244 
004000 


003446 


144124 
144066 


144044 


001162 
143702 
143672 


143662 


MACY11 ype eet 
163 


1$: 


2$: 


18$: 


19$: 


7$: 


87$: 
86$: 


8$: 


3$: 


E 
26-JUL-79 
OPERATIONAL WRITE T #2 

MOV #7 ,ARHCS2 
MOV #OAB , EVENAD 
MOV #DMD 'MCLK ! SLKM, @RHMR1 
MOV #~1 , @RHWC 
TST R1 
BMI 1$ 


MOV ZERO, @RHBAE 
MOV #EVENAD , @RHBA 
MOV MWRITE2,@RHCS1 
MOV #DMD ! SLKM, @RHMR 1 
CLR BITCNT 


BITCNT 
CMP #15 ,BITCNT 
BNE 2s 
MOV #DMD !MCLK ! SLKM, @RHMR1 
7; @RHMR 1 


MOV ADMD ! SLKM 
MOV ADMD iMCLK !SLKM, @RHMR 1 
'SLKM, @RHMR 1 


BNE 7$ 

INC BITCNT 

BNE 18$ 

CLR BITCNT 

BIT ARDY ,ARHCS1 
BNE 7$ 

INC BITCNT 

BEQ 7$ 

BR 19$ 


MOV @RHWC , WC 


Vv @RHBA , 

TST R1 

BEQ 87$ 

CLR BAE 

CLR Cs3 

JMP 86$ 

MOV ar 

MOV @RHCS3,CS3 


MOV @RHTDB. $REGO 
BIT #RDY .ARHCST 


BNE 

ERROR 102 

CMP #~-1 , ARHWC 
BNE 3$ 

ERROR 140 

CMP #ODDAD , ARHBA 
BEQ 4$ 


ERROR 141 


9 
yi PAGE 109 


SETUP UNIT SEVEN 
SETUP INFORMATION 
SETUP DIAG. MODE 


FOR ONE 
71S IT A 11 OR 70 


71T'S AN 11 
* ;ZER 


SETUP BA 
: TELL IT TO WRITETO 

MANIPULATE CLOCK 
:CLEAR LOOP COUNTER 
: INCREMENT LOOP COUNTER 
31S IT THIRD LOOP FOR SUSEC WAIT 
NO LOOP AGAIN 

+ START CHANGING CLOCK 


CHANGE CLOCK AGAIN 
:GET OUT OF DIAG MODE 
CLEAR BIT COUNTER 
:1S_RDY SET 
BIT 1S SET 
UP 


; COUNT 

;NOT FINISHED COUNTING 
[GET READY TO DO IT AGAIN 
18 IT SET YET? 


; COUNT UP 
;BIT IS NOT GOING TO SET 


;SAVE RHCS1 
SAVE WORD COUNT 
: SAVE he eee 


: NUE 
SAVE BUS ADDRESS EXTENSION 
sSAVE RHCS3 


sSAVE CS2 

SAVE TESTER STATUS 

7SAVE ERROR REGISTER 

: SAVE a3"te A hy REG. 
E me T R REG. 


: YES,CONT TEST 


SEQ 0108 


MASSBUS RH70 AND RH11 Sey te TIC 


CZRHBF P11 


037456 


0 
037512 


037516 


26-JUL-79 


017737 


10:1 
004000 


007260 
001103 


006626 
050244 


143664 


143520 


143476 


003420 
003444 
003414 


001162 


MACY11 epee 
163 OPERA 


4$: 


5$: 


6$: 


F 
26-JUL=79 
TIONAL WRITE TEST #2 


EVENAD , @RHTDB 


R7,CLEER 
R7,ERRTST 


9 
10:39 PAGE 110 


DID INFO WRITETO TESTER 


YES, CONT 

INFO DID NOT WRITETO TESTER 

SARE ANY ERROR BITS SET 

; ER ANE 

NO EXIT TEST 

1 t ARE THE CONTENTS OF ALL RH70 REG. 


THIS IS TO COMMPLETE ERROR PRINTOUT 
SCLEER ERRORS IF ANY 


J LARA REE EERE EEREREREEEREEREEREREREEREREEREEREKREKEKRE EE 


i*TEST 64 


: *WHET 


READ OPERATIONAL TEST (NORMAL) #4 
:*THESE TESTS er ALL _RFAD AND —" CODES 


WRITE REV. OR FWD 


HER_IT BE A READ REV. OR FWD OR A 
:*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND 


;*NO ERRORS SHOULD OCCUR 


PTTTTTTTTTTTTTTTTETETTTTT LETT CETTE TTTTT LTTE TTT TTT TTT TTT TTT 


15164: 


1$: 
18$: 


19$: 


2$: 


87$: 
86$: 


SCOPE 


#7 ,@RHCS2 
#-1 , ARHWC 


ARBUF , ARHBA 
#ZERO,RBUF 
MOAB , ARHTDB 


R1 


1$ 
AZERO, @RHBAE 
#READG, @RHCS1 


BITCN 
ARDY, aRHCS1 


BITCNT 
18$ 


BITCNT 
~~ ileeaataaae 


BITCNT 
2$ 
19$ 


@RHCS1,CS1 


aR TC 
@RHTDB, $REGO 


SETUP UNIT SEVEN 
;FOR ONE WORD 


;ZERO BAE 
TELL IT TO READ6 
CLEAR BIT COUNTER 
S_RDY SET 
:BIT 5 SET 
T UP 


SNOT FINISHED COUNTING 
:GET READY TO dO IT AGAIN 
1S 17 SET YET? 


: COUNT UP 
:BIT IS NOT GOING TO SET 


3SAVE RHCS1 

:SAVE WORD COUNT 

; SAVE “— ADDRESS 

333 iT RH11 

:NO_IT* < A a 
BAE 


3 NUE 
: SAVE BUS ADDRESS EXTENSION 
; RHCS3 


CS2 
SAVE TESTER STATUS 
SAVE ERROR REGISTER 
: SAVE ins tre REG. 
;SAVE MR2 T REG. 
«GET DATA 


SEQ 0109 






CZRHBF .P11 26-JUL 
5729 037766 032777 
5730 001003 


5732 0047 
5733 023777 
5734 040012 0014 


5740 04 104107 
5741 

5742 040032 0047 
5743 04 105737 


MASSBUS RH70 AND RH11 ey oe bee 
-79 10:13 


000200 
007260 
004100 
004100 
040032 


007260 
001103 


006626 
050244 


000007 
052525 
601003 
177777 


















143334 


143336 


MACY11 y phe 
T64 OPERATIONAL TEST (NORMAL) #4 


3$: 


5$: 
4$: 


6$: 


G 9 
26-JUL=79 10:39 PAGE 111 


ARDY , @RHCS1 
3$ 
102 


R7,WHYFO 
RBUF , @RHTDB 


4$ 

107 

R7 ,WHYFO 
SERFLG 

6$ 

146 

170 
R7,CLEER 
R7,ERRTST 


71S OR SET 
YES RDY IS SET 
;READY DID NOT SET 
E ANY ERRORS SET 
:DID INFO GET WRITTEN OR READ 
: INFO GOT LOADED 
;DOES RBUF = 
:YES INFO DID NOT LOAD 
ALL BITS DID NOT LOAD DURING 
3AN READ6 OPERATION 
ZEXIT TEST 
;READ6 OPERATION DID NOT WORK 
:NO BITS aH LOADED TO RBUF 


EXIT TEST 
SPRINT REGISTERS 
CLEAR ERRORS 


REE REEARREREEREREREEEEREEEEREREERRREERHERKERAERKRKR EH 


TRTEST 65 


e 


1165: 


:*THESE TESTS ary ALL READ AND | CODES 


RH OPERATIONAL READ TEST #2 


;*WHETHER IT BE _A READ REV. OR FWD OR A 
[DURING THESE TESTS THE TESTER TIMING IS MARGINED AND 
:*NO ERRORS SHOULD OCCUR 


mAs et ee eee eee eee eee te SeAS ESSE ASEESASASSLEALARSA SARA ESAS SSS SS 


SCOPE 


#7, @RHCS2 


° 


,@RHTDB 
#DMD !MCLK! SLKM, @RHMR1 
#~1 , @RHWC 


WRITE REV. OR FWD 


SETUP UNIT SEVEN 


SETUP INFORMATION se 


SETUP DIAG. MODE 
WOR 


SEQ 0119 


























143050 


2$: 


18$: 





1$ 

#ZERO, @RHBAE 
#EVENAD , @RHBA 
WREAD2, @RHCS1 


BITCNT 
ie -BITCNT 
#DMD !MCLK ! SLKM, @RHMR1 


#DMD ' SLKM, @RHMR 1 
#DMD 'MCLK ! SLKM, @RHMR1 
@RHMR1 


TCN 
ARDY , @RHCS1 
BITCNT 
18$ 


BITCNT 
ARDY ,@RHCS1 
7$ 





7SE BA 
TELL IT TO READF ROM 
MANIPULATE CLOCK 

CLEAR LOOP COUNTER 

; INCREMENT LOOP COUNTE 

:I1S IT THIRD LOOP FOR SUSEC WAIT 

:NO LOOP AGAIN 
;START CHANGING CLOCK 
[CHANGE CLOCK AGAIN 
:CHANGE CLOCK AGAIN 
[CHANGE CLOCK AGAIN 

;GET OUT OF DIAG MODE 

:CLEAR BIT COUNTER 


: UP 

NOT FINISHED COUNTING 
:GET READY TO DO IT AGAIN 
it) SET YET? 





MASSBUS _RH70 AND RH11_DIAGNOSTIC 


CZRHBF .P11 


5785 


26-JUL-79 


00403 
012777 


10:13 
003446 


143032 
143026 
143022 


177777 
004002 
004000 


007260 
001103 


006626 
050244 


000007 
177777 
004100 
125252 
000000 


000000 


63420 
003444 
003414 


142676 


142666 


142670 


142574 


H 
alg y epee 26-JUL-79 


INC BITCNT 
7$ 


9 
10:39 PAGE 112 
H OPERATIONAL READ TEST #2 


SEQ 0111 
; COUNT UP 
;BIT IS NOT GOING TO SET 


;SAVE RHCS1 
SAVE WORD COUNT 
SAVE BUS ADDRESS 


TINUE 
SAVE BUS ADDRESS EXTENSION: 
E RHCS3 


CS2 
SAVE TESTER STATUS 
SAVE ERROR REGISTER 
zSAVE TESTER DATA REG. 
; SAVE MR2 hh Bs 


:DID WC INCREMENT 
sree CONT TEST 
ADFROM OPERATION DID NOT INC WC 
DID BA INCREMENT 
YES CONT TEST 
;BA DID NOT INCREMENT AFTER AN READFROM OPERATIO 
He tor READFROM TESTER 


INFO DID NOT READFROM TESTER 
ZARE ANY rr BITS SET 
ER AN ERROR 


EST 
STHESE ARE THE CONTENTS OF ALL RH70 REG. 
: THIS IS TO ‘wee ty ERROR PRINTOUT 
:CLEER ERRORS IF 


SEEKER EKEKEKEKEEKRREKRREREKEEKEREEREERREKEEEREEKEKREKKE 


WRITE OPERATIONAL TEST (NORMAL 
;*THESE TESTS VERIFY ALL READ AND WRITE CODES 
OR FWD OR A WRITE REV. OR FWD 


) #1 


:*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND 


—MmAALELALASASALASLASLSAEASASESSSAASSEE ERE S ESE ESSE SES ASSESS ESS SS SS | 


BEQ 
BR 19$ 
7$: 
MOV @RHCS1,CS1 
MOV @RHWC , WC 
MOV @RHBA ,BA 
TST R1 
BEQ 87$ 
CLR BAE 
CLR CS3 
JMP 
87$: MOV @RHBAE ,BAE 
MOV @RHCS3,CS3 
86$: MOV @RHCS2,CS2 
MOV @RHST,DS1 
MOV @RHER ,ER1 
MOV @RHTDB,T 
MOV @RHMR2 ,T 
MOV @RHTDB ,$REGO 
ARDY ,ARHCS 
ERROR 102 
8$: ae #-1 ,@RHWC 
ERROR 3 
3$: CMP #ODDAD , @RHBA 
BEQ 
ERROR 4 
4$: CMP EVENAD , @RHTDB 
BEQ 
ERROR 5 
5$: R R7,WHYFO 
TSTB SERFLG 
BEQ 6$ 
ERROR 146 
ERROR 70 
6$: JSR R7,CLEER 
JSR R7,ERRTST 
s*TEST 66 TE 
;*WHETHER IT BE A READ REV. 
:*NO ERRORS SHOULD OCCUR 
TéT 66: SCOPE 


MOV #7 ,ARHCS2 

MOV #~1 , ARHWC 

MOV ARBUF , ARHBA 
#OAB , RBUF 

Vv el attain 


1$ 
MOV #ZERO, @RHBAE 


yA UNIT SEVEN 
;FOR ONE WORD 
>SRTUP BA 
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012777 000061 142536 1$: AMWRITEO,@RHCS1 ;TELL_IT TO WRITEO 
5037 BITCNT CLEAR BIT COUNTER 
142524 : ~ leans :1S_RDY SET 


:BI1T is SET 
BITCNT ; COUNT UP 
* 18$ ;NOT FINISHED COUNTING 
BITCNT ;GET READY TO ¥ IT AGAIN 
142502 : nes Pal SET YET? 
BITCNT ; COUNT UP 
+ :BIT IS NOT GOING TO SET 


003420 @RHCS1,CS1 ;SAVE RHCS1 

003444 @RHWC , WC SAVE WORD COUNT 

003414 @RHBA ,BA SAVE BUS ADDRESS 
R ;1S IT AN RH11 


zNO IT'S A 70 
=CLEAR BAE 
;CLEAR CS3 
: CONTINUE 
BUS ADDRESS EXTENSION 
E RHCS3 


CS2 

TESTER STATUS 

ERROR REGISTER 

ras tee a." REG. 

MR2 T REG. 
GET DATA 


142340 »@RHCS1 ZIS OR SET 
3$ YES R RDY IS SET 


007260 3 T 

004100 142342 : [DID INFO GET WRITTEN OR READ 
4$ : INFO GOT LOADED 

142334 DOES TDB = 


j @RH = 0 
YES INFO DID NOT LOAD 
sALL BITS DID NOT LOAD DURING 
zAN WRITEO OPERATION 
041026 4$ EXIT TEST 
: ;WRITEO OPERATION DID NOT WORK 
NO BITS WHERE LOADED TO @RHTDB 
007260 : J R7 ,WHYFO ANY ERRORS SET 
001103 SERFLG ANY ERRORS ? 
6$ :NO,EXIT TEST 
146 PRINT REGISTERS 


170 
006626 6$: R7,CLEER : CLEAR ERRORS 
050244 R7,ERRTST 
CAO III CII OICIOIOICIOIOIOIOIOIOIOIOIOIT OITA IAAI ASIA IIA IIIS ISIS SAAS ASA ACS 
i*TEST 67 RH OPERATIONAL WRITE TEST #3 
7* THESE TESTS VERIFY ALL ae # AND wy CODES 
:*WHETHER IT BE A READ REV FWD OR A WRITE REV. OR FWD 
:*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND 
:*NO ERRORS SHOULD OCCUR 
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CZRHBF .P11 26-JUL-79 10:13 T67 RH OPERATIONAL WRITE TEST #3 SEQ 0113 


J FARRAR AEEEEERERERERERREEARERRERERERERRERREER EEE 
TST67: 
000007 142254 #7 ,AaRHCS2 ;SETUP UNIT SEVEN 
125252 004000 #OAB, EVENAD ;SETUP INFORMATION 
003003 #DMD 'MCLK! SLKM!ISLK, @RHMR 1 ;SETUP DIAG. MODE 
177777 RT ,@RHWC ;FOR ONE D 


oo 
SESE 


1$ 
#ZERO, @RHBAE 

VENAD , @RHBA 
MWRITES ,A@RHCS1 
#DMD ! SLM! ISLK, @RHMR1 
BITCNT 


BITCNT COUNT ER 

#15 ,BITCNT 1S 1T THIRD LOOP FOR SUSEC WAIT 

2$ :NO LOOP AGAIN 

#DMD !MCLK ! SLKM! ISLK , @RHMR1 START CHANGING CLOCK 
#DMD' SLKM! ISLK,@RHMR1 ;CHANGE CLOCK AGAIN 

#DMD 'MCLK' SLKM! ISLK,@RHMR1 CHANGE CLOCK AGAIN 
aha ;CHANGE CLOCK AGAIN 


KSIVSNSAERSVSKS 


mronr 
WN 
MLONM 


:BIT IS SET 
: COUNT UP 
[NOT FINISHED COUNTING 
BITCNT :GET READY TO DO IT AGAIN 
142054 : SF Es 43 SET YET? 
BITCNT 
7$ 
19$ 
@RHCS1,CS1 7SAVE RHCS1 
HWC , WC 


SAVE WORD COUNT 
; SAVE BUS ADDRESS 


Mmror 
* 
o 


: COUNT UP 
:BIT IS NOT GOING TO SET 


MMnnvnonrvnwny 
REFERRED 


Nm 
8 


WAG 
ah cad aad 
NO 


: CONT INUE 
HBAE , 3 SAVE a ADDRESS EXTENSION 
@RHCS3, C33 Hoe ie HCS3 


@RHCS2,CS2 SAVE CS2 

@RHST ,DS1 SAVE TESTER STATUS 
@RHER,ER1 AVE ERROR REGISTER 
@RHTDB, TDR ‘SAVE TESTER DATA REG. 
@RHMR2 . TC ; SAVE MR2 i the REG. 
@RHTDB, SREGO T_DAT. 


141712 ARDY ,ARHCS1 :IS READY SET 
8$ 7YES. CONTINUE TEST 
102 READY DID NOT SET 
177777 |=141702 : MP [een -DID cer 


SESS 


SEx 


TEST 
10414 140 WRITETO OPERATION DID NOT INC WC 
022777 004002 141672 : #ODDAD , @RHBA “DID BA INCREMENT 


ek kk es tk tk td ot od ot 2 = = = = SS = SS SS SS SS Ss SS SS Ss SS SS SS Ss SS Ss SS SS SS SS SS Ss Ss SS Sh Ss SS SS SS ss SS SS 


ReEtooee 
ENSNSaSNR 


04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
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4$ YES CONT TEST 
141 7BA DID NOT INCREMENT AFTER AN WRITETO OPERATION 
004000 141674 : MP EVENAD , @RHTDB :DID INFO WRITETO TESTER 
5$ 7 YES, CONT 
142 ZINFO DID NOT WRITETO TESTER 
007260 : JS R7 ,WHYFO ARE ANY ERROR BITS SET 
001103 SERFLG WAS THER AN ERROR 
6$ NO EXIT TEST 
146 THESE ARE THE CONTENTS OF ALL RH70 REG. 
170 STHIS IS TO COMMPLETE ERROR PRINTOUT 
006626 6$: R7,CLEER -CLEER ERRORS IF ANY 
050244 J R7,ERRTST 
FERRARA RARER AEKEEAEEREEEREERREEKEEEEREEREREERRREEREREREEEEEE 
TATEST 70 WRITE OPERATIONAL TEST (NORMAL) #2 
:*THESE TESTS ary ALL yg * AND yy! CODES 
;*WHETHER IT BE A READ REV FWD OR A WRITE REV. ) ol FWD 
:*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND 
:*NO ERRORS SHOULD OCCUR 


SRA AAA RRAEERERAEREKEAKREEERREEEEKEEREEREE 


75170: 
#7 ,@RHCS2 ;SETUP UNIT SEVEN 
#-1 , aARHWC [FOR ONE WORD 
#RBUF , @RHBA “SRTUP BA 
TSETUP DATA 


#OAB , RBUF 

#ZERO,@RHTDB SETUP TESTER DB 

R1 :1S_IT AN 11_OR A 70 
1$ Z1T'S AN RH11 


#ZERO, @RHBAE ZERO BAE 
MWRITE2,@RHCS1 STELL_IT TO WRITE2 
BITCNT :CLEAR BIT COUNTER 
lai :1S_RDY SET 


BIT IS SET 
BITCNT ; COUNT UP 
18$ NOT FINISHED COUNTING 
BITCNT :GET READY TO DO IT AGAIN 
ARDY , @RHCS1 + Pl SET YET? 


BITCNT : 
2$ 
19$ 
@RHCS1,CS1 :SAVE RHCS1 
@RHWC , WC 


SAVE WORD COUNT 
: SAVE BUS Ho + an 


3 ss Ss ss Ss st 
BRPAYILZ 
SESHRASK 


gS 


Ww 
Ww 
~w 


R 
— 
Vi 
N 
~m 


g 
BRESERS 


COUNT UP 
:BIT IS NOT GOING TO SET 


REEERES 


SIRES 


: CONTINUE 
SAVE BUS ADDRESS EXTENSION 
SAVE RHCS3 


TSAVE CS2 

7SAVE TESTER STATUS 
003436 P SAVE ERROR REGISTER 
003442 @RHTDB, TDR SSAVE TESTER DATA REG. 


04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
041 
041 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 


a hs ss 4) Ss Ss Ss 2 ss 9 SS) ss. Ss SH Ss SY HH 


NNN YAO 
— 

aed ced ad eed ed ed 
RRRRRERSS 
and and and and ad ad ed 
RRRRREWRSE 
— = = NW = 
SNMIANNMANM HLA 


RRS 


017737 
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CZRHBF.P11 =. 26=JUL-79 10:13 170 E OPERATIONAL TEST (NORMAL) #2 SEQ 0115 

6009 041742 017737 141370 003440 MOV @RHMR2, TC SAVE MR2 TESTER REG. 
6010 041750 017737 141374 001162 MOV @RHTDB. SREGO GET DATA 
6011 041756 032777 000200 141344 BIT #RDY , @RHCS1 :1S OR SET 
6012 041764 001003 BNE 3$ :YES RDY IS SET 
6013 041766 104102 ERROR 102 READY DID NOT SET 
6014 041770 004737 007260 JSR R7, WHYFO TARE ANY ERRORS SET 
6015 041774 023777 004100 141346 38: CMP RBUF , @RHTDB DID INFO GET PRITTEN OR READ 
6016 042002 001407 BEQ 4$ SINFO GOT LOADED 
6017 042004 005777 141340 TST @RHTDB DOES SRHTDS =O 
6018 042010 001403 BEQ 5$ :YES INFO DID NOT LOAD 
6019 042012 104151 ERROR 151 ALL BITS DID NOT LOAD DURING 
6020 WRITE2 OPERATION 
6021 042014 000137 042022 JMP 4$ EXIT TEST 
6022 042020 104152 5$: ERROR 152 [WRITE2 OPERATION DID NOT WORK 
6023 ZNO BITS WHERE LOADED TO aRHTDB 
6024 042022 004737 007260 4$: JSR R7 ,WHYFO TANY ERRORS SET 
6025 042026 105737 001103 TSTB = $ERFLG ANY ERRORS ? 
6026 042032 001402 BEQ x3 :NO,EXIT TEST 
6027 042034 104146 ERROR 146 SPRINT REGISTERS 
6028 042036 104170 ERROR 170 

042040 004737 006626 6$: JSR R7,CLEER ;CLEAR ERRORS 

042044 004737 050244 JSR R7,ERRTST 
6031 JL REAR ERE EEKEKEKEEEEKEEEKEREREREEKEREKEEREKEKRE 
6032 T*TEST 71 RH OPERATIONAL READ TEST #3 
6033 iSTHESE TESTS VERIFY ALL READ AND WRITE CODES 
6034 *WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. OR FWD 
6035 >*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND 
6036 7*NO ERRORS SHOULD OCCUR 
6038 zs RAKE KEKEKEKEAEKEEKEKEEKEKRAKAREEEKRKEKEEEEEEEEKREREEKKEEEKEEEKEKEK 
6039 042050 000004 TST71: SCOPE 
6040 042052 012777 000007 141260 MOV = #7, @RHCS2 ;SETUP UNIT SEVEN 
6041 042060 012777 052525 141262 MOV #AB,@RHTDB SETUP INFORMATION 
6042 042066 012777 003003 141260 MOV #DMD'SLKM! ISLK!MCLK, @RHMR1 ;SETUP DIAG. MODE 
6043 042074 012777 177777 141230 MOV = #=1,@RHWC FOR ONE WOR 
6044 042102 005701 TST R1 [1S IT A 11 OR 70 
6045 042104 1 BMI 1$ Z1T'S AN 11 

2106 012777 000000 141244 MOV —s- #ZERO, ZERO BAE 

6047 042114 012777 004000 141212 18: MOV —- #EVENAD, @RHBA SETUP BA 

042122 012777 000075 141200 MOV §- #READ4 ,@RHCS1 [TELL IT TO READFROM 
6049 042130 012777 003001 141216 MOV = #DMD' SLKM! ISLK,@RHMR1 ;MANIPULATE CLOCK 
6050 042136 005037 003446 CLR BITCNT ;CLEAR LOOP COUNTER 
6051 042142 005237 003446 2s: INC BITCNT INCREMENT LOOP COUNTE 
6052 042146 022737 000015 003446 CMP Ss #15, BITCNT [1S IT THIRD LOOP FOR SUSEC WAIT 
6053 042154 001372 BNe 2$ :NO LOOP AGAIN 
6054 042156 012777 003003 141170 MOV §- #DMD! SLKM! ISLK!MCLK , @RHMR1 START CHANGING CLOCK 
6055 012 003001 141162 MOV = #DMD ! SLKM! ISLK, @RHMRT CHANGE CLOCK AGAIN 
6056 042172 012777 003003 14115 MOV —- #DMD! SLKM!ISLKIMCLK ,@RHMR1 ;CHANGE CLOCK AGAIN 
6057 012 003001 141146 MOV - #DMD ! SLKM! ISLK @RHMAT CHANGE CLOCK AGAIN 
6058 042206 012777 141140 MOV ——- #ZERO, @RHMR1 :GET OUT OF DIAG MODE 
6059 042214 005037 003446 CLR —- BITCNT [CLEAR BIT COUNTER 
6060 042220 032777 141102 18%: BIT #RDY , @RHCS1 IS RDY SET 
6061 042226 001015 BNE 7$ BIT IS SET 
6062 042230 005237 003446 INC BITCNT T UP 
6063 042234 001371 BNE 18$ [NOT FINISHED COUNTING 
6064 042236 005037 003446 CLR ~—s BITCNT [GET READY TO DO IT AGAIN 
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141060 19$: ARDY ,@RHCS1 31S IT SET YET? 
BNE YES 

BITCNT 

7$ 

19$ 

@RHCS1,CS1 SAVE RHCS1 

HWC , WC [SAVE WORD COUNT 

[SAVE BUS 7 ye 


21S IT 
ZNO IT'S’ 70 


CLEAR Cs aR C83 


‘SAVE. BUS ADDRESS EXTENSION 
VE RHCS3 


; COUNT UP 
;BIT IS NOT GOING TO SET 


zSAVE CS2 

7SAVE TESTER STATUS 

7SAVE ERROR REGISTER 

: SAVE TESTER DATA REG. 
E MR2 Ut A REG. 


1162 
140716 :IS READY SET 
BNE 8$ 


177777 + 140706 


004002 140676 


144 3;BA DID NOT INCREMENT AFTER AN READFROM OPERATIO 
004000 140700 : CMP ee ves, pee READFROM TESTER 


CON 
145 INFO DID NOT READFROM TESTER 
R7 ,WHYFO zARE ANY ERROR BITS SET 
SERFLG WAS THER AN ERROR 
6$ :NO_ EXIT TEST 
146 ; THESE ARE THE CONTENTS OF ALL RH70O REG. 
170 :THIS IS TO COMMPLETE ERROR PRINTOUT 
006626 : R7,CLEER :CLEER ERRORS IF ANY 
050244 R7,ERRTST 
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T72 WRITE OPERATIONAL TEST (NORMAL) #3 


{RRR AAAARAREEAEEAEEREREEEREEREEERERERERAEREEREREEEREEREEREKREREEEE 


:aTEST 72 
;*WHETHER IT BE A 


WRITE OPERATIONAL TEST (NORMAL) #3 
;* THESE TESTS ery ti READ wary CODES 


WRITE REV. oe FWD 


READ REV. OR FWD OR A 
;*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND 
SHOULD OCCUR 


;*NO ERRORS 


MARES AASAALALAAL ALES ELLA SEERA SRE ESAS ESE EER EE RRS SRR RRS ES 


18172: 
#7 ,ARHCS2 
#~1 , @RHWC 


#RBUF , @RHBA 
#OAB , RBUF 
«erecta 


1$ 
#ZERO, 


@RHBAE 
MWRI TEs, @RHCS1 
BITCNT 


#RDY , @RHCS1 
BITCNT 

18$ 

BITCNT 

ARDY ,@RHCS1 
BITCNT 

2$ 

19$ 
@RHCS1,CS1 
@RHWC , WC 


oe 


R1 
87$ 


BAE 
CS3 
86$ 


@RHBAE ,BAE 
@RHCS3,CS3 
@RHCS2,CS2 
@RHST ,DS1 
2ER1 
@RHTDB, TOR 


@RHMR2 TC 
@RHTDB , $REGO 


ata 


102 
R7,WHYFO 
RBUF , @RH 


4$ 
@RHTDB 
5$ 

157 


SETUP UNIT SEVEN 
OR ONE WORD 


UP BA 

7SETUP DATA 
;SETUP TESTER DB 

;1S IT AN 11 OR A 70 
Z1T'S AN RH11 

ZERO BAE 
TELL IT TO WRITES 
7CLEAR BIT COUNTER 
2IS_RDY SET 


:BIT IS SET 


: COUNT UP 

:NOT FINISHED COUNTING 
GET READY TO - IT AGAIN 
18 17 SET YET? 


; COUNT UP 
:BIT IS NOT GOING TO SET 


SAVE RHCS1 

;SAVE WORD COUNT 

+ SAVE BUS ADDRESS 
iIS iT AN RH11 

NO IT'S A 70 

7CLEAR BAE 

:CLEAR CS3 

; CONTINUE 

+ SAVE aS ADDRESS EXTENSION 
SAVE RHCS3 


7SAVE CS2 
SAVE TESTER STATUS 
SAVE ERROR REGISTER 
SAVE TESTER DATA REG. 
3; SAVE TESTER REG 

; GE 
:1S OR SET 
YES RDY IS SET 
READY DID NOT SET 
zARE ANY E 


RRORS SET 
DID INFO GET WRITTEN OR READ 
; INF LOADED 


SEQ 0117 
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043016 MP 4$ sEXIT TEST 
5$: 152 ‘WRITES OPERATION DID NOT WORK 
=NO BITS WHERE LOADED TO @RHTDB 
007260 4$: J R7,WHYFO TANY ERRORS SET 
001103 SERFLG “ANY ERRORS ? 
[NO,EXIT TEST 
146 ‘PRINT REGISTERS 


170 
006626 6$: R7,CLEER CLEAR ERRORS 
050244 R7,ERRTST 
Citi rite titi titi iiititilivitiviriririiiriiiiiititititititi ty 
TRTEST 73 RH OPERATIONAL WRITE TEST #4 
;*THESE TESTS ary ALL READ AND WRITE CODES 
:*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. OR FWD 
: *DURING THESE TESTS THE TESTER TIMING IS MARGINED AND 
3;*NO ERRORS SHOULD OCCUR 


OEIC titi tii iii iii iii ii iitiiiitiititiititiititiiti tii tit 
TST73: 
140264 MOV #7 ,ARHCS2 SETUP UNIT SEVEN 
004000 #OAB ;SETUP INFORMAT 


000007 

125252 4 -EVENAD ION 

000003 140264 #DMD !MCLK , @RHMR1 SETUP DIAG. MODE 
177777 =140234 MOV : - @RHWC 


1$ 
140250 #ZERO, @RHBAE 
140216 : MEVENAD , @RHBA SETUP BA 
140204 WWRITE6, ARHCS1 TELL IT TO WRITETO 
140222 #DMD , @RHMR 1 MANIPULATE CLO 
BITCNT ;CLEAR LOOP COUNTER 
: BITCNT as eo LOOP COUNTE 
003446 MP #15 .BITCNT IS IT THIRD LOOP FOR Suse WAIT 
2s NO LOOP AGAIN 
140174 ADMD !MCLK , @RHMR 1 START CHANGING CLOCK 
140166 #DMD , @RHMR 1 ;CHANGE CLOCK AGAIN 
140160 ADMD !MCLK , @RHMR 1 CHANGE CLOCK AGAIN 
140152 #DMD , @RHMR1 
140144 #ZERO, @RHMR1 


sepeees ge 
tcc rr) 


CNT i CLEAR a! COUNTER 
140106 : :1S_RDY SET 
7$ :BIT 1s SET 


: COUNT UP 

NOT FINISHED COUNTING 
BITCNT GET READY ver ee IT AGAIN 
#RDY ,@RHCS1 1S 17 SET Y 


e 


BITCNT : COUNT UP 
7$ BIT IS NOT GOING TO SET 


19$ 


003420 @RHCS1,CS1 SAVE RHCS1 

003444 @RHWC , WC ;SAVE WORD COUNT 

003414 MOV @RHBA ,BA SAVE _BUS ADDRESS 
R1 31S IT AN RH11 
87$ :NO_IT'S A 70 
BAE CLEAR BAE 


Seenee 


BERR 
NOWUSWN—O 
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MASSBUS RH 
CZRHBF.P11 =. 26=JUL=79 10:13 173 OPERATIONAL WRITE TEST #4 SEQ 0119 
6218 043310 005037 003424 CLR Cs3 ZCLEAR CS3 

6219 0463314 900137 043334 JMP 86$ + CONT INUE 

6220 043320 017737 140034 003416 87$: MOV @RHBAE ,BAE ‘SAVE BUS ADDRESS EXTENSION 

6221 063326 017737 140030 003424 MOV @RHCS3,CS3 ;SAVE RHCS3 

6222 043334 017737 140000 003422 86$: MOV @RHCS2,CS2 CS 

6223 043342 017737 137774 003432 MOV @RHST,DS1 ‘SAVE TESTER STATUS 

6224 043350 017737 137770 003436 MOV @RHER,ER1 SSAVE ERROR REGISTER 

6225 043356 017737 137766 003442 MOV @RHTDB, TDR TSAVE TESTER DATA REG. 

6226 043364 017737 137746 003440 MOV @RHMR2,TC SSAVE MR2 TESTER REG. 

6227 043372 017737 137752 001162 MOV @RHTDB, SREGO 3GET DATA 

6228 043400 032777 000200 137722 BIT #RDY , @RHCS1 z1S READY SET 

6229 043406 001001 BNE BS ‘YES, CONTINUE TEST 

6230 043410 104102 ERROR 102 SREADY DID NOT SET 

6231 043412 022777 177777 137712 8S: CMP #~1 ,aRHWC [DID WC INCREMENT 

6232 043420 001001 BNE 3$ sYES,CONT TEST 

6233 043422 104140 ERROR 140 :WRITETO OPERATION DID NOT INC WC 
6234 043424 022777 003776 137702 3$: CMP #EVENAD-2, @RHBA [DID BA INCREMENT 

6235 043432 001401 BEQ 4$ ‘YES CONT TEST 

6236 104141 ERROR 141 ‘BA DID NOT INCREMENT AFTER AN WRITETO OPERATION 
6237 043436 023777 004000 137704 4$: CMP EVENAD , @RHTDB :DID INFO WRITETO TESTER 

6238 043444 001401 BEQ 5$ YES, CONT 

6239 043446 104142 ERROR 142 SINFO DID NOT WRITETO TESTER 
6240 043450 004737 007260 S$: JSR R7,WHYFO TARE ANY ERROR BITS SET 

6241 043454 105737 001103 TSTB = SERFLG ‘WAS THER AN ERROR 

6242 043460 001402 BEQ rx ‘NO EXIT TEST 

6243 043462 104146 ERROR 146 STHESE ARE THE CONTENTS OF ALL RH7O REG. 
6244 043464 104170 ERROR 170 :THIS IS TO COMMPLETE ERROR PRINTOUT 
6245 043466 004737 006626 6$: JSR R7,CLEER *CLEER ERRORS IF ANY 

6246 043472 004737 050244 JSR R7.ERRTST 

6247 Zz FARRER REKEREKRKEEEEEEEREKEEEEKEREEEREKRREREEKREREEKEERERERERKEKRE 

6248 T*TEST 74 WRITE OPERATIONAL TEST (NORMAL) #4 

6249 :*THESE TESTS VERIFY ALL READ A. WRITE CODES 

6250 S*WHETHER IT BE A READ REV. OR FWD OR A WRITE REV. OR. FWD 

6251 :*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND 

6252 :*NO ERRORS SHOULD OCCUR 

6254 J LAA REAR EKEKEEEEEEKEEEKEEEREEREREREERERKEEREERKERE RE 

6255 043476 000004 TS174: SCOPE 

6256 043500 012777 000007 137632 MOV #7 aRHCS2 :SETUP UNIT SEVEN 

6257 043506 012777 177777 137616 MOV #-1, @RHW [FOR ONE WORD 

6258 043514 012777 004100 137612 MOV PROUT ORIBA :SRTUP BA 

6259 043522 012737 125252 004100 MOV #OAB , RBUF ‘SETUP DATA 

6260 043530 012777 000000 137612 MOV #2ZERO, @RHTDB : SETUP TESTER DB 

6261 043536 005701 TST R1 ‘IS IT AN 11 OR A 70 

6262 043540 100403 BMI 1% tIT'S AN R RHITE 

6263 043542 012777 000000 137610 MOV #ZERO, @RHBAE [ZERO BAE 

6264 043550 012777 000067 137552 1$: MOV WRITES, @RHCS1 ‘TELL IT TO WRITE6 

6265 043556 005037 003446 CLR BITCNT 7CLEAR BIT COUNTER 

6266 043562 032777 000200 137540 18$: BIT ARDY, @RHCS1 ‘IS RDY SET 

6267 043570 001015 BNE 2$ ‘BIT IS SET 

6268 043572 005237 003446 INC BITCNT *COUNT UP 

6269 043576 001371 BNE 18$ ‘NOT FINISHED COUNTING 

6270 043600 005037 003446 CLR BITCNT “GET READY TO DO IT AGAIN 

6271 043604 032777 000200 137516 19$: BIT ARDY, @RHCS1 :1S IT SET YET? 

6272 043612 001004 BNE : YE 

6273 043614 005237 003446 INC BITCNT ‘COUNT UP 
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043710 


26-JUL-79 1 
001401 
000770 


017737 


137350 


044012 
007260 
001103 


006626 
050244 


000007 
052525 
000003 
177777 


000000 
004000 


003420 
003444 
003414 


137354 


137356 


137254 
137222 


MACY11 ae 
174 


BEQ 
BR 
2$: 


87$: MOV 
86$: MOV 


3$: CMP 


5$: ERROR 


4$: JSR 


6$: JSR 


D 
26=JUL-79 
2$ 
19$ 


@RHCS1,CS1 
@RHWC , WC 
HBA 


@RHBAE , BAE 
@RHCS3,CS3 
@RHCS2,CS2 
@RHST ,DS1 
@RHER ,ER1 
atids TDR 


@RHR2 , TC 
@RHTDB , $REGO 
ARDY , @RHCS1 
3$ 

102 
R7,WHYFO 
RBUF , @RHTDB 
4$ 

@RHTDB 

5$ 

117 


10 
10:39 +s 1 
E OPERATIONAL TEST (NORMAL ) 


:BIT IS NOT GOING TO SET 


: SAVE RHC ¥ 


; CLEAR 
;CLEAR CS3 
ONT INUE 
;SAVE BUS ADDRESS EXTENSION 
SAVE RHCS3 
sSAVE CS2 
: SAVE TESTER STATUS 
AVE ERROR REGISTER 
‘AVE TESTER DATA REG. 
;SAVE MR2 TESTER REG. 
;GET DATA 
31S OR SET 
sYES RDY IS SET 
sREADY DID NOT SET 
;ARE ANY ERRORS SET 
DID INFO GET WRITTEN OR READ 
+ INFO GOT LOADED 
;DOES @RHT DB = 0 
‘YES INFO DID NOT LOAD 
;ALL BITS DID NOT LOAD DURING 
ZAN WRITE6 OPERATION 
sEXIT TEST 
sWRITE6 OPERATION DID NOT WORK 
;NO BITS WHERE LOADED TO @RHTDB 
ZANY ERRORS SET 
ANY ERRORS ? 


NO,EXIT TEST 
{PRINT REGISTERS 
CLEAR ERRORS 


PTI TITITIIITIITT ITLL LLL LL LEE ELE LE LE LLL EEL 
RH OPERATIONAL READ TEST #4 

:*THESE TESTS erg! ALL READ AND wy CODES 

*WHETHER IT BE A READ REV. OR FwD OR A 

>*DURING THESE TESTS THE TESTER TIMING IS MARGINED AND 


:*TEST 75 


:*NO ERRORS SHOULD OCCUR 


WRITE REV. OR FWD 


—MmAsete tea tecec esi cte tte cesta SaseeSSESESSASELSESEEESEEL SLES ESE SS 


1$: MOV 


78175: SCOPE 


#7 ,@RHCS2 
W#AB 


1$ 
#ZERO, @RHBAE 


MEVENAD , @RHBA 


-@RHTDB 
ADMD !MCLK ,@RHMR1 
#~1 , @RHWC 


SETUP UNIT SEVEN 
SETUP INFORMATION 
fd DIAG. MODE 


SEQ 0120 
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012777 


177777 


003776 


137210 
137226 


137150 
137112 


137070 


003420 
003444 
003414 


136716 


136706 


136710 


MACY11 30A(1052) 
175 RH OPERA 


2$: 


18$: 


19$: 


7$: 


87$: 
86$: 


8$: 


3$: 


4$: 


5$: 


E 10 
26-JUL-79 ii .? PAGE 122 


TIONAL READ TES 
#READ6, @RHCS1 
#DMD , ARHMR 1 
BITCNT 
BITCNT 
7. -BITCNT 
#DMD !MCLK , @RHMR1 
ADMD , @ 1 
ADMD !MCLK , @RHMR1 
ADMD , @RHMR 1 
#ZERO, @RHMR1 
BITCNT 
ARDY ,@RHCS1 
7$ 
BITCNT 
18$ 


BITCNT 
ARDY ,ARHCS1 
7$ 


BITCNT 

7$ 

19$ 

@RHCS1 ° 


@RHWC , W 
@RHBA ,BA 


@RHBAE ,BAE 
@RHCS3,CS3 
@RHCS2,CS2 
@RHST ,DS1 
@RHER ,ER1 
@RHTDB, TD 
@RHMR2, TC 
@RHTDB, $REGO 
Y,@RHCS1 


143 
1 stata -@RHBA 


144 
 teciteamatiate 





SEQ 0121 


7 TELL oP TO con 
;MAN ATE 


; INCREMENT LOOP COUNTE 
:1S IT THIRD LOOP FOR Susec WAIT 
LOOP AGAIN 


START CHANGING CLOCK 
;CHANGE CLOCK AGAIN 
sCHANGE CLOCK AGAIN 
; CHANGE CLOCK AGAIN 
:GET OUT OF DIAG MODE 
+i ae Rai COUNTER 
:1S_RDY SET 
:BIT 1S SET 
: COUNT UP 
NOT FINISHED COUNTING 


T READY TO s IT AGAIN 
1 SET YET? 


; COUNT UP 
;BIT IS NOT GOING TO SET 


;SAVE RHCS1 
SAVE WORD COUNT 
SAVE _BUS ADDRESS 


NUE 
SAVE BUS ADDRESS EXTENSION 
RHCS3 


E CS2 
SAVE TESTER STATUS 
SAVE ERROR REGISTER 
:SAVE TESTER DATA REG. 
;SAVE MR2 TESTER REG. 
he DATA 


:DID WC INCREMENT 
iYES. CONT TEST 

READF ROM a taal ay DID NOT INC WC 
:DID BA INCREMENT 
:YES CONT TEST 
BA DID NOT INCREMENT AFTER AN READFROM OPERATIO 
:DID in ° READFROM TESTER 


; ON 

INFO DID NOT READFROM TESTER 
SARE ANY ERROR BITS SET 
; ER_AN ERROR 


a ne eee ee 


[THESE ARE THE CONTENTS OF ALL RH70 RES. 
:THIS IS TO COMMPLETE ERROR PRINTOUT 
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ERE 
oO 


ERKKEEE 
CONAUSWR— 


6419 
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044462 004737 006626 
044466 004737 050244 


000004 


012777 


005000 
174000 
050370 
003452 
000002 
047660 
000161 


003446 
000200 


003446 


003446 
000200 


003446 
000200 
1s 
136426 
136422 


003416 
003424 


136636 


136630 


136634 


177570 


136520 


136506 


136464 


136444 


003420 
003444 
003414 
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175 RH OPERATIONAL READ TES 


1 # SEQ 0122 
6$: JSR R7,CLEER ;CLEER ERRORS IF ANY 
JSR R7,ERRTST 


DARIUS IISISISIOISISIOIIEIISIOISIIIIIIIOIUIOIIIOIIOIIIIUIOIUIIIOIIDIUI IIIT tt tt tt 
i*TEST 76 LARGE TRANSFER TEST 
; THIS TEST DOES A 4K (OCTAL) WORD TRANSFER 


a PAGE 123 


[THE SECOND TIME THR 


OUGH THE TEST SYNC CLOCK 
D TO MAKE SURE NO ERRORS OCCUR 


MR AAAAAALAAASZASLALLALALALAAALALALALALALALEA SEAR AR ARR SARA ASAD DSS DI 


71S MARGINE 
TST76: SCOPE 
MOV #7 ,ARHCS2 
CLR ayPSw 
CLR PASS 
BLITZ CLR LOOCNT 
IN: TST R1 
BMI 1$ 
MOV #ZERO,@RHBAE 
1$: MOV #5000, @RHBA 
MOV #-4000, @RHWC 
MOV ABLKTST, @VECADD 
TST R1 
BEQ BLIP 
TST PASS 
BEQ BLIP 
BIT #B1T1,04177570 
BEQ BOTTOM 
JSR R7,DUPORT 
BR RHNINT 
BLIP: MOV AWRITEO! IE,@RHCS1 
CLR BITCNT 
18$: BIT ARDY ,ARHCS1 
BNE 2$ 
INC BiTCNT 
BNE 18$ 
CLR BITCNT 
19$: BIT ARDY , @RHCS1 
BNE 
INC BITCNT 
BEQ 2$ 
BR. 19$ 
2s: 
BIT #RDY ,@RHCS1 
BNE 25$ 
ERROR 102 
25$: ERROR 205 
RHNINT: 
MOV @RHCS1,CS1 
MOV @RHWC , WC 
MOV @RHBA, 
TST R1 
BEQ 87$ 
CLR BAE 
CLR Cs3 


LOOP COUNTER 
u OR 70 

0 ZERO THE BAE 
HE BUS ADDRESS 


;USE IT IN INTERUPT MODE 


;SET INTERUPT AND TELL IT TO WRITE 


;CLEAR BIT COUNTER 
:1S_RDY SET 
:BIT is SET 


: COUNT UP 

SNOT FINISHED COUNTING 
;GET READY TO DO IT AGAIN 
+: SET YET? 


; COUNT UP 
:BIT IS NOT GOING TO SET 


:DID READY SET 
YES READY SET 
:READY DID NOT SET 

T DID NOT INTERUPT 


;SAVE RHCS1 


3 H11 
:NO_IT'S A 70 
CLEAR BAE 
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001103 
002000 


006626 
050244 


003376 
000001 


000002 


1356230 


136206 


003376 


G 10 
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LARGE TRANSFER TEST 


JMP 86$ 7 CONT INUE 
87$: MOV @RHBAE ,BAE 7 SAVE = ADDRESS EXTENSION 
MOV @RHCS3,CS3 :SAVE RHCS3 
86$: MOV @RHCS2,CS2 SAVE CS2 
MOV @RHST,D :SAVE TESTER STATUS 
MOV @RHER,ER1 :SAVE ERROR REGISTER 
MOV @RHTDB, TDR ;SAVE TESTER DATA REG. 
MOV @RHMR2 , TC ‘SAVE MR2 TESTER REG. 
9$: BIT #ATA!ERR,@RHST 31S ATTEN OR ERROR SET 
BNE 3$ ‘YES THERE WAS A PROBLEM 
BIT ARDY ,A@RHCS1 :DID RDY SET 
E 4$ sYES IT SET 
ERROR 102 zRDY DID NOT SET 
4$: CMP #5000+<4000*2>,@RHBA ;DID BA INC PROPERLY 
BEQ — 5$ s¥es be 
ERROR 203 ;BA DID NOT INC PROPERLY 
5$: ae > alabes gataiat ;WAS CORRECT INFO WRITTEN 
ERROR 204 ‘CORRECT INFO NOT IN RHTDB 
6$: TST @RHWC ‘IS we 0 
BEQ 7$ 7YES 
ERROR 206 sRHWC IS NOT ZERO 
7$: TSTB SERFLG zWAS THERE ANY ERRORS 
BEQ 8$ NO 
BIT #PSEL ,@RHCS1 
BEQ 
ERROR 207 
3$: ERROR 146 ;OUTPUT THE REGISTERS 
FRROR 170 
8$: TST LOOCNT :1S IT FIRST PASS IN TEST 
BNE 11$ 5 
INC LOOCNT sMAKE IT SECOND PASS 
MOV #SCLK!7,aRHMR2 
:SET THE he CLOCK BIT AND 441 BLK SIZE 
JMP IN :DO THE TEST AGAIN 
11$: CLR LOOCNT = CLEAR THE COUNTER 
TST PASS 
E BOTTOM 
INC PASS 
JMP BLITZ 
BOTTOM: JSR R7,WHYFO :TO SEE WHY IT DIED 
JSR R7,CLEER ;CLEAR THE REGISTERS 
sin tiie JSR R7,ERRTST UNDERLINE ERROR MESGES 
7s IF NEEDED 
ITITTITITI TTI TTI TITI TLL ITT T TLL Ltt LLL LLL 
SSTEST 77 HERE IS WHERE I HANDLE 4 RH'S 
3*THIS IS THE ROUTINE THAT ALLOWS THE 
>*THE DIAGNOSTIC TO TEST FOUR RH'S 
CT REE EERE REE EEE EERE REE EERE ERREER ERE 
TST77: SCOPE 
ENDPAS: INC DEVCNT ; INCREMENT THE DEVICE COUNT 
va #1,DEVCNT aie tt DEVICE 2 


003376 


CLEVER :YE 
CMP ag EVENT 31S IT DEVICE 3 


SEQ 0123 
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C 
CZRHBF P11 26-JUL-79 10:13 177 HERE IS WHERE I HANDLE 4 RH'S SEQ 0124 
6498 045220 000137 045640 JMP ROTEEN 7 YES 
6499 045224 022737 000003 003376 1$: CMP #3,DEVCNT 21S IT DEVICE 4 
6500 045232 001002 BNE 2$ 3NC,CONTINUE SEARCH 
6501 045234 000137 045744 JMP IS 7YES 
6502 045240 022737 000004 003376 2$: CMP #4 ,DEVCNT HAVE WE TESTED ALL 4 RH'S 
6503 045246 001470 BEQ RESTAT YES 
6504 045250 104401 045256 TYPE ,65$ ste Asciz STRING 
6505 045254 000421 BR 64$ GET OVER THE ASCIZ 
6506 3365$: .ASCIZ <15><12>/PROGRAM ERROR ON TESTING 4 RH'S/ 
6507 045320 64$: 
6508 045320 104401 045326 TYPE ,67$ oo ASCIZ tg 
6509 045324 000426 BR 66$ GET OVER THE ASCIZ bat a 
6510 3367$: .ASCIZ <15><12>/RESTARTING TO TEST RH #1 AT BASE ADDRESS / 
6511 045402 66$: 
6512 045402 013746 003366 MOV DEVIC1,-(SP) oon DEVIC! FOR TYPEOUT 
6513 045406 104402 TYPOC ::GO TYPE=-OCTAL ASCII(ALL DIGITS) 
6514 045410 013737 003366 003400 MOV DEVIC1,DEVICS FOR REG. ADDRESS CREATION 
6515 045416 012737 005302 003410 MOV #GIGO,RETAIN 7GET ADDRESS ERROR RETURN 
6516 045424 000137 046050 JMP CORREG [CORRECT REG. ADDRESSES 
6517 045430 005037 003376 RESTAT: CLR DEVCNT :CLEAR DEVICE COUNTER 
6518 045434 005726 TST (SP)+ ; CORRECT STACK 
6519 045436 013737 003366 003400 MOV DEVIC1,DEVICS SET UP TO CREATE ADDRESSES 
6520 045444 104401 045452 TYPE Ay ao ASCIZ STRING 
6521 045450 000421 BR GET OVER THE ASCIZ 
6522 365$: .ASCIZ @185<12>/TESTING RH #1 AT BASE ADDRESS / 
6523 045514 648: 
6524 045514 013746 003366 MOV DEVIC1,-(SP) so DEVIC1 FOR TYPEOUT 
6525 045520 104402 TYPOC : TYPE=~OC TAL + ag he DIGITS) 
6526 045522 012737 005302 003410 MOV #GIGO,RETAIN SAVE RETURN ADDRESS 
6527 045530 000137 046050 JMP CORREG :GO CREATE ADDRESSES 
6528 045534 005737 003370 CLEVER: TST DEVIC2 1S IT 0 
6529 045540 001733 BEQ RESTAT :YES,.END PASS 
6530 045542 013737 003370 003400 MOV DEVIC2,DEVICS tr READY TO CONSTRUCT 
6531 045550 012737 005456 003410 MOV #G1GO1,RETAIN AVE oe ERROR ADDRESS 
6532 045556 104401 045564 TYPE ,65$ 22 TYPE asciz S TRING 
6533 045562 000421 BR 64$ GET OVER THE ASCIZ 
6534 ;365$: .ASCIZ <15><12>/TESTING RH 42 AT BASE ADDRESS / 
6535 045626 64$: 
6536 045626 013746 003370 MOV DEVIC2,-(SP) 4h DEVIC2 FOR TYPEOUT 
6537 045632 104402 TYPOC TYPE=-OCTAL ASCII(ALL DIGITS) 
6538 045634 000137 046050 JMP CORREG CREATE REG. ADDRESSES 
6539 045640 005737 003372 ROTEEN: TST DEVIC3 :IS IT 
6540 045644 001671 BEQ RESTAT YES ,END PASS 
6541 045646 013737 003372 003400 MOV DEVIC3,DEVIC5S GET BASE ADDRESS 
6542 045654 012737 005616 003410 MOV #G1GO2,RETAIN SAVE RETURN ADDRESS 
6543 045662 104401 045670 TYPE ,65$ phy oaa't STRING 
6544 045666 000421 BR 64$ GET OVER THE ASCIZ 
6545 37658: .ASCIZ <15><12>/TESTING RH #3 AT BASE ADDRESS / 
6546 045732 64$: 
6547 045732 013746 003372 MOV DEVIC3,-(SP) 3:SAVE DEVIC3 FOR TYPEOU 
6548 045736 104402 TYPOC 3:GO TYPE--OCTAL ASCII CALL DIGITS) 
6549 045740 000137 046050 JMP CORREG CORRECT REG. ADDRESSES 
6550 045744 005737 003374 IS: TST DEVIC4 :1S IT0 
6551 045750 001627 ; BEQ RESTAT YES ,END PASS 
6552 045752 013737 003374 003400 MOV DEVIC4 ,DEVICS 7GET BASE ADDRESS 
6553 045760 012737 005756 003410 MOV #G1G03,RETAIN >SAVE RETURN ADDRESS 


MASSBUS RH7C AND RH11 esi ee 
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6554 57 104401 045774 
6555 045772 000421 
6556 
6557 046036 
6558 046036 013746 003374 
6559 046042 104402 
6560 046044 000137 046050 
6561 046050 013737 3400 
6562 046056 012702 003330 
6563 013722 003402 
6564 046066 022702 3360 
6565 046072 001405 
6566 046074 062737 “4 
6567 046102 000137 046062 

568 61 013737 003400 
6569 11 3737 3404 
6570 046122 013737 003402 
6571 61 737 2 
6572 046136 013737 003402 
6573 046144 013737 003330 
6574 046152 5237 3 
6575 046156 005037 001102 
6576 046162 005237 001102 
6577 61 012737 
6578 - 046174 5737 003376 
6579 62 001402 
6580 046202 000137 006306 
6581 
6582 
6583 
6584 
6585 
6586 
6587 
6588 
6589 
6590 046206 
6591 046206 
6592 046210 005037 001102 
6593 046214 005037 001212 
6594 6220 005237 001100 
6595 6224 042737 100000 
6596 046232 005327 
6597 6234 1 
6598 62 3063 
6599 046240 012737 
6600 046242 1 
6601 046244 0462 
6602 046246 104401 046254 
6603 046252 000407 
6604 
6605 046272 
os 046272 013746 001100 
6608 046276 104405 
6609 63 104401 046306 


003402 


001212 


001100 
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IS WHERE I HANDLE 4 SEQ 0125 
TYPE ,65$ pba ASCIZ STRING 
BR 4$ GET OVER THE ASCIZ 
=_— ASCIZ <15><12>/TESTING RH #4 AT BASE ADDRESS / 
MOV DEVIC4,-(SP) ape | DEVIC4 FOR TYPEOUT 
TYPOC GO TYPE=-OCTAL ASCII(ALL DIGITS) 
JMP CORREG [CORRECT REG. ADDRESSES 
CORREG: MOV DEVICS,OFF11 :GET BASE ADDRESS 
MOV #RHCS1,R2 :GET ADDRESS TO START STORING 
BEHIND: MOV OFF11,(R2)+ : STORE ADDRESS 
CMP #RHBAE ,R2 ;WAS IT LAST ADDRESS 
BEQ AHEAD 
ADD #TWO,OFF11 : CREATE NEXT ADDRESS 
JMP BEHIND :GO STORE IT 
AHEAD: MOV DEVIC5 ,a#OFF 11 
ADD REGEND ,OFF 11 SETUP BAE ADDRWESS 
MOV OFF 11 ,RHBAE STORE ADDRESS 
ADD #2 ,0FF11 ;SETUP_CS3 ADDRESS 
MOV OFF 11,RHCS3 aes THE ADDRESS 
MOV . RHCS1,RHCS1B  » Lal HIGH BYTE 
INC RHCS1B [FOR R CS1 
CLR STSTNM CLEAR’ TEST NUMBER 
INC STSTNM :SET TO TEST 1 
MOV #1,$TIMES :FOR ONE IT 
TST DEVCNT zARE WE AT END pA PASS 
BEQ SEOP YES DO END OF P, 


‘ASS 
JMP TSTADD ZNO,SEE IF RH IS PRESENT 
-SBTTL END OF PASS ROUTINE 


| tet gen gmp ree i a i i 
: + INCREMENT THE PASS NUMBER ($PASS 
:*7YPE "END PASS #XXXXX TOTAL NUMBER OF ERRORS SINCE LAST REPORT Yyyyy"' 
*WHERE XXXXX AND YYYYY ARE DECIMAL NUMBERS 
:*IF THERES A MONITOR GO TO IT 
;*IF THERE ISN'T JUMP TO BEGIN2 


fEOP: 
SCOPE 
CLR STSTNM 22ZERO ne TEST NUMBER 
CLR STIMES 23 ZER O THE NUMBER OF ITERATIONS 
INC $PASS ; INCREMENT THE PASS NUMBER 
BIC #100000, $PASS +: DON' T ALLOW A NEG. NUMBER 
DEC (PC) + ;;LOOP? 
$EOPCT: .WORD 1 
BGT SDOAGN ssVes 
MOV (PC)+,a(PC)+ 7zRESTORE COUNTER 
SENDCT: .WORD 1 
SEOPCT 
TYPE 65$ 72 TYPE ASCIZ STRING 
BR 64$ 7 ;GET OVER THE ASCIZ 
i798: eASCIZ <12><15>/END PASS #/ 
MOV $PASS ,-(SP) 7: SAVE SPASS FOR TYPEOUT 
7; TYPE PASS NUMBER 
TYPDS 3:GO TYPE--DECIMAL ASCII WITH SIGN 


TYPE -67$ 72 TYPE ASCIZ STRING 
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046304 000421 


046350 


046350 013746 001112 


377 


032737 
001155 


032737 
001151 
032737 


0co 


177570 


177570 


177570 


001202 
001204 
001204 


001204 


003446 


001202 
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MACY11 30A(1052) 26=JUL=79 10: 
END OF PASS ROUTINE 
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BR 66$ ;GET OVER THE ~ 
us -ASCIZ / TOTAL ERRORS SINCE LAST REPORT / 
MOV SERTTL,-(SP) aa A SERTTL FOR TYPEOUT 
TOTAL NUMBER OF ERRORS 
TYPDS £360 TYPE=-DECIMAL ASCII WITH SIGN 
TYPE ,SCRLF YPE CARRIAGE RETURN, LINE FEED 
CLR SERTTL CLEAR ERROR TOTAL 
$GET42: MOV a4#42,R0 + GET MONITOR ADDRESS 
EQ SDOAGN 33 CH IF NO MONITOR 
RESET 7zCLEAR THE WORLD 
SENDAD: JSR PC, (RO) ::GO TO MONITOR 
NOP 3:2: SAVE ROOM 
NOP FOR 
NOP scACT11 
SDOAGN: 
JMP a(PC)+ 7; RETURN 
SRTNAD: .WORD BEGIN2 
SENULL : y id -1,-1,0 ;ZNULL CHARACTER STRING 


DL ERK EEK EERE 


;THIS IS THE WATBIT PROGRAM 


FL ARERR EKER E KEE EKKREKKEREREREEREKEREREE EERE KH 


WATBIT: ate a4#177570 i ERROR PRINTOUT ? 


EGE. EEO. |. en Ae 1. Lee nmN 


chcE2: BIT #81T8,a4177570 
ete ttitti iii ittiistiititiiii titi iiiiiiiiitiiiiiiiiitiiiiiii ts) 
BNE R1TURN 
trite ttitiiitiietiii tit iiitiiiiiiiiiiiiiiiitititicititititis. 
CGE: BIT #81T0,a4177570 
IGRI IOI OID IOIDIOICIOIOICIOIOIOIOIOIOIOIOIOIIOI OTTO TOTTORI TOTO TTT ITAA SNS SASSISSASSIASE 
BNE RITURN 
CLR BITCNT :CLEAR BIT COUNTER 
MOV SREGO,STMP2 [SAVE GOOD DATA IN $REGO 
MOV STMP1,STMPS ; SAVE CONTENTS OF BAD wes 
BIC $SREGO,STMP3 WHERE EXTRA BITS SET ? 
TST $STMP3 :F IND OUT 
BEQ NEXTST FIND OUT WHAT BITS WHERE NOT SET 
TYPE 65$ atti ascls STRING 
64$ GET OVER THE ASCIZ 
i795: ASCIZ <15><12>/THESE ARE THE BIT NO. OF THE EXTRA BITS./<15><12> 
MOAR: BIT HONE , STMP3 FIND THE EXTRA 
BNE PRIBIT G0 TO PRINT or NO. 
MOOR: ROR STMP3 ; SETUP FOR NEXT BIT 
CMP #17, BITCNT :1S IT BIT "5% LAST TESTED 
BEQ NEXTST :YES,SEE IF ANY BITS WHER NOT SET 
INC BITCNT NOT LAST BIT YET 
BR MOAR £60 TO TEST NEXT BIT 
NEXTST: CLR BITCNT 


A Sie BIT COUNTER 

FIND WHAT BITS WHER NOT SET 
“WAS ALL BITS SET THAT SHOULD HAVE BEEN 
:YES,AND TEST FINISHED 


BIC $TMP1,$TMP2 
$TMP2 
RETURN 
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CZRHBF .P11 26-JUL-79 10:13 END OF PASS SEQ 0127 


104401 046646 ,65$ ze TYPE ASCIZ STRING 
000426 BR 64$ 33GET OVER THE ASCIZ 
tag <15><12>/BIT NO. OF THE BITS THAT WHERE NOT SET/<15><12> 


64$: 
032737 000001 001202 MORE2: HONE , $TMP2 sF IND BIT NOT SET 
001014 OR BIT FOUND 


PRIBIT 
001202 : STMP2 
000017 003446 #17, ,BITCNT 
RETURN AND TEST FINISHED 


. 003446 ' BITCNT NO SETUP FOR NEXT BIT 
63 MORE 2 


BR ; CONTINUE TEST 
001223 : .$CRLF 
: R7 RETURN TO MAIN PROG. 
PRIBIT: 


013746 003446 MOV BITCNT,~(SP) 7;SAVE BITCNT FOR TYPEOUT 
104405 32GO TYPE=-DECIMAL ASCII WITH SIGN 
000760 rarest BR MORE ;LOOK FOR MORE 
013746 003446 MOV BITCNT,~(SP) OT BITCNT FOR TYPEOUT 
104405 7GO TYPE--DECIMAL ASCII WITH SIGN 
000676 BR MOOR ;LOOK FOR MORE 

Raat tal Sabalodstaebalat-taoiaieblaiehlobtalobtoiobieitaiobet-ta-tlaleloabeiotohiahaiehiatehiel 

THIS ROUTINE HANDLES TIMEOUT ERRORS 


POTITITITITIIITT ITIL LTT titi LLL LLL LLL 


TIEOUT: 
104401 TYPE ,65$ : 7s TYPE ASCIZ STRING 
000434 


BR 4$ GET OVER THE ASCIZ 
pees: . <15><12><12>/PROGRAM INSTRUCTION OR ADDRESS HAS CREATED A TIMEOUT/ 
104401 ,67$ rp hg ASCIZ STRING 
000422 BR 66$ :GET OVER THE ASCIZ_ 
ag ° <15><12>/ADDRESS- WHICH CAUSED TIMEOUT WAS / 
012637 06 (SP) +, $TMP4 MOVE ADDRESS TO STORAGE 
000002 001206 #TWO,STMPS CORRECT ADDRESS 
V STMP4 ,~-(SP) 2 SAVE simps FOR TYPEOUT 
O TYPE--OCTAL ASCII(ALL DIGITS) 
,09$ ii TYPE ASCIZ STRING 


BR 68$ :GET OVER THE ASCIZ 
SASCIZ <15><12>/PSwW WAS / 


MOV (SP) +,$TMP4 GET OLD PSW 

MOV STMP4 ,-(SP) a STMP4 FOR TYPEOUT 

TYPOC :GO TYPE--OCTAL ASCII(ALL DIGITS) 
34 $LPADR, (SP) FAKE RETURN 


SL ARERR KEKE 


; THIS ROUTINE HANDLES PARITY ERRORS 


CL AREA KEE EEK EEKEK EEK EKER KE 


PARITY: 
047242 TYPE ,05$ ss Tyre ASCIZ STRING 
BR 64$ :GET OVER THE ASCIZ 
3365$:  .ASCIZ <15><12>/PARITY TRAP TO VECTOR ADDRESS 114/ 
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64$: 
104401 047314 ,67$ cir ASCIZ STRING 
000420 BR 66$ sGET OVER THE ASCIZ 
jig? <15><12>/ADDRESS THAT CAUSED TRAP WAS / 
012637 (SP) +, RBUF sGET PC+2 
162737 00000 #TWO,RBUF *CORECT PC 
RBUF ,~(SP) fh VE RAUF FOR TYPEOUT 
G0 a eacat art ASCII(ALL DIGITS) 
,69$ TYPE ASCIZ STRING 
68$ SIGET OVER tue ASCIZ 
<15><12>/PSW WAS / 


(SP) + , RBUF ;GET OLD rie 
RBUF ,~(SP) ;SAVE RBUF FOR TYPEOUT 

:i¢0 TYPE=-OCTAL ASCII(ALL DIGITS) 
R1 zARE WE ON AN 11/70 


E 
BM TRAPED :NO, ITS A 11/05-11/45 
047442 71$ : TYPE Asti TRING 
BR 70$ = GET OVER THE ASCIZ 
<15><12>/HIGH ERROR ADDRESS REG. = 


177742 004100 HERADD , RBUF 
004100 RBUF ,=(SP) ;7SAVE RBUF FOR TYPEOUT 
:GO TYPE=-OCTAL ASCII (ALL DIGITS) 
047522 73$ :E TYPE ASCIZ STRING 
72$ :GET OVER THE ASCIZ 
<15><12>/LOW ERROR ADDRESS REG. = 


177740 004100 LERADD , RBUF 
004100 RBUF ,~(SP) m RBUF FOR TYPEOUT 
“ict sie DIGITS) 


047600 iz 
ia <15><12>/MEMORY SYSTEM ERROR REG. = / 


177744 004100 MEMERR , RBUF 
004100 RBUF ,~(SP) 73SAVE RBUF FOR TYPEOUT 
T 72GO TYPE--OCTAL ASCII(ALL DIGITS) 
TRAPED: SLPADR, (SP) :FAKE RET 
RETURN WHERE LEFT OFF 


FUERA KKK EKKKEEKEKEKEEEEKEEEEAEEKEEEEREKEEREKEKEKEKEKEKKEKKKK 


THIS IS THE DUAL PORT ROUTINE 


hab abaiedebselelalalabeigle tot th-tebabeletolabtcteb bt tebalolohbelehiebebieiebboiehiebehiabobahile 


133442 MWRITEO!PSEL! IE ,@RHCS1 
C BITCNT :CLEAR BIT COUNTER 
133430 : “1 center :1S_RDY SET 


:BIT IS SET 

BITCNT COUNT UP 
18$ [NOT FINISHED COUNTING 

BITCNT GET READY TO dO IT AGAIN 
133406 : #RDY ,ARHCS1 :IS IT SET YET? 

BULL , 7YES 

BITCNT COUNT UP 

BULL ;BIT IS NOT GOING TO SET 
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000770 


032777 000200 
001001 


012737 
017737 
042737 


133236 
177770 


000000 
133234 
000117 


063737 
050220 017737 


133366 


001162 
001200 
001200 
001162 


001200 
001200 


001162 
001200 
001200 
001162 


001200 
001200 


003454 
177570 
001103 
003456 


003460 
003460 
050234 


M 10 
MACY11 30A(1052) ere 10: 
END OF PASS ROUTI 


19$ 
ARDY ,ARHCS1 
CUTE 


ERROR 102 
CUTE: RTS PC 
DUBAI SII IIS IOI IOIDIIIIIIOIDIOIDIOIDIOIOIOIOIOIOIIOIIOI OT ITT TOT TOT TET TIE 


THESE ARE THE CLEARS ROUTINES 


5 LARA EREEREREAERRERKEERERERE EERE EKEEEKRE KEE 


FINDIT: MOV #0,$REGO :GET READY TO FIND ERROR 
MOV @RHCS1,$TMP1 GET COMPARE READY 
BIC #READ6! GO! IE!RDY!A16!A17!PSEL!DVA, $TMP1 
- 3CLEAR BITS NOT NEEDED 
RTS RETURN TO PROGRAM 


R7 
: MOV #0,$REGO :GET READY TO FIND ERROR 
MOV @RHCS2,$TMP1 GET COMPARE READY 
#US1!US2!US4!BAI!PAT!CLR!IR!OR,$TMP1 
:CLEAR BITS NOT NEEDED 
RETURN TO PROGRAM 
GET READY TO FIND ERROR 
GET COMPARE READY 


:CLEAR BITS NOT NEEDED 
R7 RETURN TO PROGRAM 
#0,$REGO :GET READY TO FIND ERROR 
@RHST ,$TMP1 GET COMPARE READY 


#DRY!DPR!MOL!PIP,$TMP1 
:CLEAR BITS NOT NEEDED 
R7 ;RETURN TO PROGRAM 
#7 ,$REGO ;GET READY TO FIND ERROR 
@RHCS2,$TMP1 3;GET COMPARE READY 
WBAI!PAT!CLR!IR!OR!MPE !MXF !PGE'!NEM!NED!UPE ' WCE !DLT,$TMP1 
;CLEAR BITS NOT NEEDED 
+ RETURN TO PROGRAM 
EG 3GET _— TO FIND ERROR 
@RHCS3,$TMP1 T COMPARE READY 
#1E3! IPCKO!IPCK1 rR a STMP 
:CLE AR BITS NOT NEEDED 
R7 ;RETURN TO PROGRAM 
CDI ISICISISIOICIOICIOIOIIOIOICIOICI IOI IOI IOI IOI IOI TOI TOR TOR TOR TOT TOT TOTTI AIS AIAN 


3* THIS ROUTINE IS THE TEST NUMBER CORRECTION ROUTINE 


J EAE KEEEKEEEKEKEKEEREKKEEEKERKEKKKEREEKEKKEEEEREREEKKEREERKK 


$TSTNM, TSTNM GET THE TEST NUMBER 
TSTNM+1 :CLEAR UPPER BYTE 
#SW13 84177570 1 7 ea TYPEOUT 
TSTNMA 

#1,SERFLG 


ils IT FIRST ERROR 
TSTNMA 
TSTNM, OF FSET 7GET TEST NUMBE 
OF F SET CREAT OFFSET 
M#HEADER , HEDDAD GET BEGINING OF TABLE 


OF FSET ,HEDDAD CREATE MES ADDRESS 
@HEDDAD , HEDADD SET UP FOR MESSAGE 


39 PAGE 130 


#0, $REGO 
@RHER , $TMP1 
#ZERO,$TMP1 


R 
CS3ERR: 
MOV 


SEQ 0129 
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050226 104401 001223 : TYPE -SCRLF 
050232 104401 TYPE 

050234 000000 HEDADD: 0 

050236 004737 074166 TSTNMA: JSR R7 ,@#SERRTYP :GO_TO ERROR TYPE ROUTINE 
050242 000207 RTS R7 RETURN TO ERROR ROUTINE 


20 MR aa!!! 


THIS PROGRAM WHILL 3} ae THE ERROR 
;PRINTOUT BETWEEN TEST 


stbabtabsinakansepetieetenannaannaiemaiiiimmiaantntbianteaeited 


050244 105737 001103 ERRTST: TSTB SERFLG WAS THERE AN ERROR FOUND 
001446 BEQ OUTOF 3NO ,GO TO NEXT TEST 
Baenrs 020000 177570 #SW13,04177570 S INHIBIT TYPEOUT ? 


OUTOF YES 

013737 001102 003454 $TSTNM, TSTNM :GET TEST NO. 

105037 003455 CLRB —sTSTNM+1 ‘CLEAR UPPER BYTE 

104401 050302 ,65$ js TYPE ASCIZ STRING 

000406 64$ :GET OVER THE ASCIZ 
<15><12>/***°TEST / 


013746 003454 TSTNM,=-(SP) 33SAVE TSTNM FOR TYPEOUT 

104402 2:2GO TYPE=-OCTAL ASCII(ALL DIGITS) 
104401 050332 .67$ 2a TYPE ASCIZ S$ Wr rsp 

000416 BR 66$ GET OVER THE A 


ov ASCI 
: / ERROR MESSAGE (55 See et soci oacize<12> 
000207 OF : R7 


DARIUS UII IOIIIOISISIIIIOIIIOIIOIDIOIOIIDIIOIDIIOIISISIIOIUIDOIOIIOIIOIO Int 
:THIS IS THE INTERUPT ROUTINE 
;FOR THE LARGE TRANSFER TEST 


2 ERA ARR A KA EERKEAAREREARERERAEERREEEEEREEEREEEREREREREEERKEEREEKEKK KK 


050370 012716 044672 BLKTST: MOV #RHNINT , (SP) ;SET THE CORRET RETURN 
050374 000002 RTI AND RETURN 
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Z7RHBF 


P13 


050376 
0 
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020124 


020124 


041527 
052040 
052050 


020101 
020122 
024040 
032440 


020105 


024467 
020115 


24 
024460 


031523 
052040 
052050 
030461 


B 11 
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J FARRAR EREEREREEEEEEEREEERERRERERERREERRERRAREERRRRRERHER EE 


7; ;HEADER MESSAGES FOR ERROR PRINT OUTS 


J LEAR REREEEEERERERARREERAREEEREREARREEEREREERERREEEERER KEE 


HED1: 


HED2: 


HED3: 


HED4: 


HEDS: 


HED6: 


HED7: 


HED10: 


HED11: 


HED12: 


-ASCIZ/RH ADDRESS DECODE TEST (TEST 1)/ 


eASCIZ/CLEAR TEST (TEST 2)/ 


-ASCIZ/TESTER CONNECTED TEST (TEST 3)/ 


«ASCIZ/WORD COUNT CLEAR TEST (TEST 4)/ 


-ASCIZ/RHBA CLEAR TEST (TEST 5)/ 


-ASCIZ/RHBAE CLEAR TEST (TEST 6)/ 


-ASCIZ/RHDB CLEAR TEST (TEST 7)/ 


-ASCIZ/PROM REGISTER DECODE TEST (TEST 10)/ 


-ASCIZ/RHCS3 BIT TEST (TEST 11)/ 


-ASCIZ/RHWC BIT TEST (TEST 12)/ 


C1 
: 


1 
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000051 
020105 HED13: .ASCIZ/RHBAE BIT TEST (TEST 13)/ 
042524 
042524 
024463 


020101 : .ASCIZ/RHBA BIT TEST (TEST 14)/ 


-ASCIZ/RHDB BIT TEST (TEST 15)/ 


024465 
020103 : .ASCIZ/RHWC OPERATIONAL TEST (TEST 16)/ 


SAOWN EO 


024040 
030440 
020101 : .ASCIZ/RHBA OPERATIONAL TEST (TEST 17)/ 


wi 
=D 

3 ed a a ce cae ed cae ed ed ed 
NNQOUISE SWWN 
WSR 


-ASCIZ/NEM,TRE AND SC BIT TEST (TEST 20)/ 


eASCIZ/WCE,TRE AND SC BIT TEST (TEST 21)/ 


-ASCIZ/MDPE,TRE AND SC BIT TEST (TEST 22)/ 


-ASCIZ/UPE,TRE AND SC BIT TEST (TEST 23) RH11 ONLY/ 


026105 051124 : .ASCIZ/UPE,TRE AND SC BIT TEST (TEST 24)/ 
020105 047101 020104 
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051472 
051500 


-ASCIZ/NED,TRE AND SC BIT TEST (TEST 25)/ 


-ASCIZ/MXF ,TRE AND SC BIT TEST (TEST 26)/ 


-ASCIZ/PGE TRE AND SC BIT TEST (TEST 27)/ 


020124 


051124 : .ASCIZ/MXF,TRE AND SC BIT TEST (TEST 30)/ 


-ASCIZ/MCPE AND SC ERROR BIT TEST (TEST 31)/ 


owe 


-ASC1Z/DBL TEST,1 WORD FROM A BASE 4 ADDRESS (TEST 32)/ 


-ASCIZ/DBL TEST,2 WORD FROM A BASE 4 ADD. (TEST 33)/ 


HED34: .ASCIZ/DBL TEST,3 WORD FROM A BASE 4 ADD. (TEST 34)/ 


052154 7 040440 041040 


SEQ 0133 
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709% 052 041040 051501 020105 
7095 052672 020064 042101 027104 
7096 052700 024040 042524 052123 
7097 052 032040 024463 000 


052706 
7098 052713 104 046102 gee HED44: .ASCIZ/DBL TEST,3 WORD ,NOT A BASE 4 ADD.,WRITE REV (TEST 44)/ 


7108 053002 041104 020114 042524 HED45: .ASCIZ/DBL TEST.2 WORD READ FWD (TEST 45)/ 
7109 053010 052123 Be eae 053440 ' 


0 000 
053045 104 046102 goes HED46: .ASCIZ/DBL TEST,2 WORD READ FWD,NOT A BASE 4 ADD. (TEST 46)/ 


NNNNANNN NNW 
ze em oh > Pe 
ak ad ad aad cad a ed ee ee ed 
WONAUSWN—O 
So 
aie a 
See 
RES So 
So 
Ww 
pa 
Ww 
So 
Ww 
Oo 
N 
a 
= 
N 
& 


7123 053132 041104 020114 042524 HED47: .ASCIZ/DBL TEST,2 WORD READ REV,BASE 4 ADD. (TEST 47)/ 


000 . 
7131 053211 104 046102 052040 HEDSO: .ASCIZ/DBL TEST,2 WORD READ REV,NOT A BASE 4 ADD. (TEST 50)/ 
0532 020062 


1 
7140 053276 0411046 020114 042524 HEDS1: .ASCIZ/DBL TEST,3 WORD READ FWD,BASE 4 ADD. (TEST 51)/ 


000 
7148 053355 104 046102 052040 HEDS2: .ASCIZ/DBL TEST,3 WORD READ REV,BASE 4 ADD. (TEST 52)/ 
7149 053362 051505 026124 020063 
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HBF 


054054 
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040505 
051105 


tet Lat a 
O-" WO — NNN 
2h 2 


z 
| 
{NU SAS 
aR GRRE 


24 
024460 
050117 


020104 
052101 


MACY11 30A(1052) prea 


G 11 
10:39 PAGE 137 


END OF PASS ROUTIN 


HEDS3: 


HEDS4: 


HEDSS: 


HED56: 


HEDS7: 


HED60: 


HED61: 


HED62: 


-ASCIZ/WCE EW ERROR TEST ‘WCELO’’ (TEST 53)/ 


eASCIZ/WCE OW ERROR TEST ‘WCEHI'’ (TEST 54)/ 


-ASCIZ/INTERUPT ENABLE TEST (TEST 55)/ 


-ASCIZ/READ OPERATIONAL TEST (NORMAL #1) (TEST 56)/ 


-ASCIZ/RH OPERATIONAL WRITE TEST #1 (TEST 57)/ 


-ASCIZ/READ OPERATIONAL TEST (NORMAL #2)(TEST 60)/ 


-ASCIZ/RH OPERATIONAL READ TEST #1 (TEST 61)/ 


-ASCIZ/READ OPERATIONAL TEST (NORMAL #3)(TEST 62)/ 


SEQ 0136 


MASSBUS RH70 AND RH11_DIAGNOSTIC MACY11 30A(1052) 26=JUL-79 


CZRHBF .P11 


BPS 


NAVIIAIIIVIS 
SowmNAnRWN—O 


054540 


H 11 
10:39 PAGE 138 
26-JUL-79 10:13 END OF PASS ROUTINE 


020114 
024040 
046101 
052050 
031066 
-ASCIZ/RH OPERATIONAL WRITE TEST #2 (TEST 63)/ 


ee nd 


-ASCIZ/READ OPERATIONAL TEST (NORMAL #4)(TEST 64)/ 
-ASCIZ/RH OPERATIONAL READ TEST 42 (TEST 65)/ 
020062 
020124 


052111 :  .ASCIZ/WRITE OPERATIONAL TEST (NORMAL #1)(TEST 66)/ 


-ASC1Z/RH OPERATIONAL WRITE TEST #3 (TEST 67)/ 


-ASCIZ/WRITE OPERATIONAL TEST (NORMAL #3)(TEST 70)/ 


-ASCIZ/RH OPERATIONAL READ TEST #3 (TEST 71)/ 


2 
020124 024040 


SEQ 0137 
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033440 


HED72: .ASCIZ/WRITE OPERATIONAL TEST (NORMAL #3)(TEST 72)/ 


033440 
eg HED73: .ASCIZ/RH OPERATIONAL WRITE TEST #4 (TEST 73)/ 


020064 

020124 

020105 HED74: .ASCIZ/WRITE OPERATIONAL TEST (NORMAL #4) (TEST 74)/ 
-ASCIZ/RH OPERATIONAL READ TEST #4 (TEST 75)/ 


032467 
020105 : .ASCIZ/LARGE TRANSFER TEST 671 WORDS (TEST 76)/ 


055062 020124 
055070 
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7302 FLERE RAE RARER EEE ERRERRERERRERERREERERRERERE RE 


7303 ERROR MESSAGES 


FLERE RARER REAR RE REE REREEE RRR ERERERRERRREERERREERERER REE ED 


-EVEN 
it 14 055074 047503 051122 041505 EM!: -ASCIZ/CORRECT BIT DID NOT SET IN RHWC/ 
1 
7313 055134 047503 oF 1365 041505 EM2: ~ASCIZ/CORRECT BIT DID NOT SET IN RHBA/ 
0001 
4h Goats 047503 051122 041505 EM3: -ASCIZ/CORRECT BIT DID NOT SET IN BUS ADDRESS REG./ 
055 0404 042104 
7325 055240 051523 051040 043505 
055246 000056 
7327 055250 047503 051122 041505 EM4: eASCIZ/CORRECT BIT DID NOT SET IN RHDB/ 
73 0001 
Oe 055310 047516 peste 054105 EMS: -ASCIZ/NON~EXISTANT MEMORY DID NOT SET IN RHCS2/ 


000 
A 9 hyd 040 047514 044507 EM6: eASCII/ LOGIC TO SET TRE BIT IN RHCS1 REGISTER/<15><12> 


5015 
7347 055432 gti 047040 poets -ASCII/IS NOT WORKING,GO TO (CSRB) PRINTS IF RH11/<15><12> 


7354 04 15 
7355 055506 17 024040 051503 -ASCIZ/OR (CSTB) PRINTS IF RH70 IN LOCATION B7 ON BOTH PRINTS/ 
7356 055514 24 020051 051120 


K 1 
; 


1 
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051524 
4122 


-ASCIZ/NEM BIT DOES NOT READ AS SET IN RHCS2/ 


-ASCIZ/NEM AND SC NOT SET IN RHCS1/ 


-ASCIZ/SC BIT SET BY ATTN OR MCPE ERROR/ 


046440 
051105 
044504 : .ASCIZ/ SC DID NOT SET/ 
020124 


-ASCIZ/TRE BIT IS SET BUT SC READS AS CLEARED/ 


-ASCIZ/WCE BIT DID NOT SET/ 
-ASCIZ/WCE BIT DID NOT SET/ 
-ASCIZ/TRE BIT NOT SET/ 


-ASCIZ/WCE AND TRE ARE SET BUT SC BIT NOT SET/ 


044502 

020124 
0561 044504 : .ASCIZ/UPE DID NOT SET IN RHCS2/ 
056174 0201 7516 020124 
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020124 047111 
1510 031123 
040440 EM21:  .ASCII/TRE AND SC BITS ARE SET/ 
020103 
040440 
052105 
047101 
041040 
042111 
051440 


044502 : .ASCIZ/SC BIT NOT SET/ 
020124 


EM22:  .ASCIZ/UPE AND SC BIT DID NOT SET/ 


044504 -ASCIZ/NED DID NOT SET IN RHCS2/ 
020124 

047111 
031123 
040440 -ASCIZ/TRE AND SC SHOULD NOT SET/ 
020103 

042114 

051440 


051440 : .ASCIZ/TRE SHOULD NOT BE SET/ 


-ASCIZ/TRE BIT WAS NOT SET BY NED/ 
-ASCIZ/MXF BIT DID NOT SET IN RHCS2/ 
-ASCIZ/MXF BIT SHOULD BE SET IN RHCS2/ 


-ASCIZ/MXF AND SC ARE NOT SET/ 


-ASCIZ/TRE READS AS CLEARED,MXF AND SC ARE SET/ 


1523 040440 
051440 052105 
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EM34:  .ASCIZ/TESTER DOES NOT READ AS BEING CONNECTED/ 


-ASCIZ/BIT IN RHCS3 WILL NOT SET/ 


-ASCIZ/RH DID NOT RESPOND TO ADDRESS/ 


-ASCIZ/DLT DID NOT SET IN RHCS2/ 


4440 
051503 
051511 : .ASCII/DLT IS NOT SET IN RHCS2,BUT TRE AND SC ARE SET/<15><12> 


-ASCIZ/TRE AND SC COULD HAVE BEEN SET BY ANOTHER ERROR/ 


-ASCIZ/OUTPUT READY DID NOT SET WHEN INFO WAS LOADED INTO THE DATA BUFFER/ 


-ASCIZ/ALL BITS DID NOT LOAD INTO RHWC (177777)/ 


2101 
020117 
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7525 057350 041527 024040 033461 
Ost 057364 044122 ETH 049020 EM43: .ASCIZ/RHWC DID NOT LOAD ANY BITS (177777)/ 


04211 7040 
7529 057400 046040 040517 020104 
7530 057406 047101 020131 044502 
7531 057414 051524 024040 033461 
7532 057422 033467 033467 000051 
7533 057430 047523 042515 041040 EM44: .ASCIZ/SOME BITS CLEARED IN RHWC AFTER CLR WAS LOADED INTO RHCS2/ 
7534 057436 052111 020123 046103 
7535 057444 040505 042522 020104 
536 057452 047111 051040 053510 
7537 057 020103 043101 042524 
7538 057 020122 046103 020122 
7539 057474 0 sagt: 047514 


754 
7543 057522 047516 area ne 025102 EM45: .ASCIZ/NON-EXISTANT MEMORY BIT SET IN RHCS2 (NEM)/ 


7551 057575 122 pete 07010) EM46:  .ASCIZ/RHBA DID NOT CLR AFTER CLR WAS LOADED INTO RHCS2/ 


556 14 
7557 oe eeee 042105 044440 052116 


000062 
peree 046101 gah: 044502 EM47: .ASCIZ/ALL BITS DID NOT LOAD INTO RHBA (177776)/ 


5 7A Bere 4 040517 044504 EM50: .ASCIZ/LOADING TRE AFTER ITS SET DOES NOT CLEAR ERROR/ 


7575 060006 043520 noel? 044504 E—M51:  .ASCIZ/PGE DID NOT SET IN RHCS2/ 


7578 060030 051040 041510 031123 
79 060036 000 
7580 060037 124 042510 050040 EM52: .ASCII/THE PROM WHILE ACCESSING A REGISTER/<15><12> 





MASSBUS RH70 AND RH11_DI i, ep 
CZRHBF .P11 79 


26-JUL- 


22 
051105 


A 
1 
0 
0 
0 
0 
0 


047522 


000 
042501 


020122 


B 12 
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EM72: 


EM73: 


EM74: 


-ASCII/WHICH YOUR TESTER CANNOT SUPPLY INFORMATION/<15><12> 


-ASCIZ/FOR SAYS INFO IS PRESENT/ 


-ASCIZ/RHCS1/ 


-ASCIZ/RHCS2/ 
-ASCIZ/RHST/ 
-ASCIZ/RHER/ 
-ASCIZ/RHAS/ 
-ASCIZ/RHTDB/ 


-ASC1Z/RHDS/ 
-ASCIZ/RHMR1/ 
-ASCIZ/RHDT/ 
-ASCIZ/RHBAE/ 
-ASC1IZ/RHCS3/ 


-ASCIZ/DEVICE NUMBER IN RHMR2 DOES NOT EQUAL A 7AFTER A CLEAR/ 


-ASCIZ/RHCS1 HAS AN ERROR BIT SET/<15><12> 


-ASCIZ/ERROR BIT SET IN RHCS2/ 


-ASCIZ/ERROR BIT SET IN RHER/ 


SEQ 0144 


C 12 
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042523 
051040 


4 

1 

5 020122 EM75: -ASCIZ/ERROR BIT SET IN RHST/<15><12> 

2 044440 EM76: -ASCIZ/RHBA INCREMENTED BUT IT DID NOT CARRY OVER TO RHBAE,RHBAE SHOULD =40/ 


7656 060665 122 eet e 042040 £—M77:  .ASCII/RDY DID NOT SET,AND WORD COUNT DID NOT INCREMENT/<15><12> 


7664 
ord 060747 104 044517 043516 -ASCIZ/DOING A WRITE OPERATION/ 


7670 060777 122 041110 94 244 EM100: .ASCII/RHBAE DID NOT CLEAR AFTER CLR WAS LOADED/<15><12> 


7671 2040 042111 

7672 061012 052117 041440 042514 

7673 0610 051101 0404 052106 

7674 061026 051105 041 051114 

7675 0610 053440 051501 046040 

7676 061 040517 042 5 

7677 061050 012 

7678 061051 111 052116 020117 -ASCIZ/INTO RHCS2/ 
7679 0610 044122 051503 000062 

7680 061 051127 052111 020105 £M101: .ASCIZ/WRITE REVERSE OPERATION DID NOT WORK/ 
7681 061072 042522 042526 051522 

7682 061100 020105 050117 051105 

7683 061106 052101 047511 020116 

7684 061114 020104 04 

7685 061122 020124 047527 045522 

rene 061130 

7688 061131 122 054504 042040 £M102: .ASCIZ/RDY DID NOT SET IN RHCS1/ 
7689 061136 042111 047040 052117 

7690 061144 051440 052105 044440 

7691 061152 020116 044122 051503 

7692 061160 


D 12 


ny og we AND RH11_DIAGNOSTIC MACY11 30A(1052) 26=JUL=79 10:39 PAGE 147 
CZRHBF . 26-JUL=79 10:1 END OF PASS ROUTINE SEQ 0146 
7693 061162 052504 044522 043516 EM103: .ASCII/DURING A WRITE OPERATION RDY DID NOT SET/<15><12> 
7694 061170 0440 053440 044522 
7695 061176 042524 047440 042520 
7696 061204 040522 044524 047117 
7697 1212 051040 054504 042040 
7698 1220 042111 047040 052117 
7699 061226 051440 052105 005015 . 
7700 1234 0475 042122 041440 -ASCII/WORD COUNT DID NOT INCREMENT ,BUT INFORMATION/<15><12> 
7701 061242 052517 052116 042040 
7702 061250 0421 047040 052117 
7703 061256 044440 041516 042522 
7704 264 042515 052116 041054 
7705 061272 052125 044440 043116 
7706 1300 051117 040515 044524 
7707 306 047117 005015 
7708 061312 040527 020123 051127 -ASCIZ/WAS WRITTEN TO TESTER/ 
7709 1320 052111 042524 020116 
7710 061326 047524 052040 051505 
7711 334 042524 000122 
061340 052504 044522 043516 EM104: .ASCII/DURING A WRITE OPERATION RDY DID NOT SET/<15><12> 

7713 346 0440 053440 044522 
7714 061354 042524 047440 042520 
7715 362 040522 044524 047117 
7716 061370 051040 054504 
7717 +=061376 042111 047 052117 
7718 404 051440 052105 0050 
7719 061412 047527 042122 041440 -ASCII/WORD COUNT DID NOT INCREMENT,AND INFORMATION/<15><12> 
7720 061420 052517 052116 04 

21 061426 042111 047 052117 
7722 044440 0415 
7723 061442 042515 052116 

061450 042116 044440 043116 

7725 061456 051117 040515 044524 
7726 047117 005015 
7727 061470 040527 020123 047516 -ASCIZ/WAS NOT TRANSFERED TO THE TESTER/ 
7728 061476 020124 051124 047101 
7729 043123 051105 042105 


7730 052040 4124 
7731 061520 020105 on 052123 
7733 ~=061531 102 042501 044440 EM105: .ASCIZ/BAE IS MESSED UP,IT SHOULD EQUAL 40,/ 
7734 061536 2515 23 


0000 
7740 061576 040502 020105 044504 EM106: .ASCIZ/BAE DID NOT INCREMENT/ 
7741 604 020104 047516 020124 
7742 061612 047111 051103 046505 

061620 600124 
7744 061624 042522 042101 07 1088 EM107: .ASCIZ/READ REV OPERATION DID NOT READ FROM TESTER TO STORAGE LOCATION (RBUF ) / 
7746 061640 040522 044524 047117 


7747 061646 042040 042111 047040 
7748 061654 052117 051040 040505 


ef 
MASSBUS _RH70 AND RH11_DIAGNOSTIC MACY11 30A(1052) 26=JUL=79 10: 
CZRHBF .P11 26-JUL=79 10:13 END OF PASS ROU! INE 


39 PAGE 148 
SEQ 0147 


-ASCII/RHBAE EQUALS 0,1T SHOULD EQUAL 40/<15><12> 


eASCIZ/AFTER A ONE WORD WRITE/ 


-ASC1Z/A17 DID NOT SET AFTER BA WAS INCREMENTED/<15><12> 


-ASC1Z/BA 11D NOT INCREMENT/ 


-ASCI1/BA INCREMENTED BUT IT DID NOT CARRY TO/<15><12> 


-ASCIZ/A16 AND A17 IN RHCS1/ 
044122 


g3e10? : .ASCII/OUTPUT READY WAS NOT NEGATED AFTER CLR WAS/<15><12> 


047040 
043505 
040440 
041440 
051501 


-ASCIZ/LOADED INTO RHCS2/ 


-ASCIZ/ALL BITS DID NOT READ TO STORAGE LOC. (RBUF) DURING A READ REV. OPERATION 


0505 0201 
051440 047524 





MASSBUS RH70 AND RH11 piAgnag Tic 


CZRHBF .P11 


7805 


26-JUL-79 1 


046040 
051050 
042040 
020107 
042101 
020056 
052101 


020105 
020105 
3 


051440 


046102 
047040 
052105 


R RAAGLAGR 


RIOR 
Oo 


052105 


042040 
052117 
040440 


MACY11 30A(1052) OF a etichd 


F 12 
10:39 PAGE 149 


END OF PASS ROUTI 


EM116: 


EM117: 


EM120: 


EM121: 


EM122: 


EM123: 


EM124: 


-ASCIZ/MDPE DID NOT SET IN RHCS2/ 


-ASCII/INFO DID NOT WRITE TO TESTER DOING A/<15><12> 


eASCIZ/WRITE REVERSE OPERATION/ 


-ASCIZ/TRE AND SC WHERE NOT SET BY MDPE/ 


-ASCIZ/TRE IS SET IN RHCS1,MDPE AND SC/ 


-ASCIZ/SHOULD ALSO BE SET/ 


-ASCIZ/MDPE AND SC SHOULD BE SET/ 


-ASCIZ/TRE AND SC ARE SET, PGE SHOULD ALSO BE SET/ 


-ASCII/DBL DID NOT SET AFTER A 4 WORD WRITE FROM/<15><12> 


SEQ 0148 


G 12 


MASSBUS RH70 AND RH11 4) fe MACY11 30A(1052) Ds licsata 10:39 PAGE 150 
CZRHBF .P11 26~JUL=79 10:13 END OF PASS ROUTIN SEQ 0149 
7861 063034 052106 051105 040440 
7862 063042 032040 953440 051117 
7863 063050 020104 051127 052111 
864 063056 020105 051106 046517 
7865 06 005015 
7866 047101 042440 042526 -ASCIZ/AN EVEN ADDRESS/ 
7867 3074 0201 042101 051104 
7868 063102 051505 000123 
7869 3106 0411 020114 042523 EMI25: .ASCII/DBL SET IN RHCS3 DOING A 1 WORD WRITE FROM/<15><12> 
7870 063114 020124 047111 051040 
7871 063122 0415 031523 042040 
72 3130 044517 04 040440 
7873 136 0304 34 051117 
7874 063144 020104 051127 052111 
7875 063152 020105 051106 046517 
7876 160 005015 
7877 063162 047101 042440 042526 -ASCIZ/AN EVEN ADDRESS/ 
7878 063170 020116 042101 051104 
7879 063176 051505 12 
3202 0411 020114 042523 £EM126: .ASCII/DBL SET IN RHCS3 ON A 3 WORD WRITE FROM/<15><12> 
7881 063210 020124 047111 051040 
063216 041510 031523 047440 
7883 063224 020116 020101 020063 
063232 0475 0421 053440 
7885 063240 044522 042524 3040 
7886 063246 047522 00651 012 
7887 063253 101 020116 053105 -ASCIZ/AN EVEN ADDRESS/ 
7888 063260 047105 040440 042104 
7889 063266 042522 051523 000 
063273 104 046102 042040 EM127: .ASCII/DBL DID NOT SET IN RHCS3 AFTER A 2 WORD/<15><12> 
7891 063300 042111 052117 
7892 051440 052105 04 
7893 063314 020116 044122 051503 
063322 0063 04 042524 
7895 30 020122 020101 020062 
7896 063336 047527 042122 005015 
7897 063344 051106 046517 040440 -ASCIZ/FROM AN EVEN ADDRESS/ 
7898 063352 020116 053105 04 


7105 
7899 063360 040440 042104 042522 
063366 000 
7901 063371 115 050103 020105 EM130: .ASCIZ/MCPE SET IN RHCS1 BUT SC READS AS CLEARED/ 


7903 051040 04 030523 
063412 041040 052125 051440 
7905 063420 020103 04 042101 


7906 
7907 063434 042514 051101 042105 
063443 115 03010) 020105 §EM131: .ASCIZ/MCPE DID NOT SET IN RHCS1/ 


7912 063464 047111 051040 041510 


000 
7914 063475 127 042503 046040 EM132: .ASCIZ/WCE LO IN RHCS3 DID NOT SET/ 
7915 063502 020117 047111 051040 
7916 063510 041510 031523 042040 


H 12 
MASSBUS RH70 AND RH11_D1 MACY11 30A(1052) M cieralih: 10:39 PAGE 151 


CZRHBF .P11 26-JUL-79 END OF PASS ROUTINE SEQ 0150 
052117 
000 


EM133: .ASCII/WCE LO SHOULD ONLY BE SET IN RHCS3 BUT/<15><12> 


~ASCIZ/WCE HI ALSO READS AS SET/ 
0505 
020123 
020105 : .ASCIZ/WCE LO SET IN RHCS3 BUT WCE DID NOT SET IN RHCS2/ 


-AS°1Z/WCE HI DID NOT SET IN RHCS3/ 


eASCIZ/WCE HI SET IN RHCS3 BUT WCE DID NOT SET IN RHCS2/ 


-ASCII/WCE HI SHOULD ONLY BE SET IN RHCS3 BUT/<15><12> 


-ASCIZ/WCE LG ALSO READS AS SEi/ 


-ASCIZ/WRITE OPERATION DID NOT INCREMENT WORD COUNT/ 


eRRERRERREERERPERREPPETOR? 
FAURE WABNASSIS g 


051117 020104 047503 





MASSBUS RH70 AND RH11 Serpe ee 


CZRHBF .P11 


26-JUL-79 1 


0 0 
042101 


042101 
052101 


057105 
020123 


047440 


I 12 


MACY11 30A(1052)  seminct 10:39 PAGE 152 
END OF PASS ROUTINE 


—M141: 


EM142: 


EM143: 


EM144: 


EM145: 


EM146: 


EM147: 


-ASCIZ/BUS ADDRESS DID NOT INCREMENT AFTER A WRITE/ 


-ASCIZ/INFORMATION DID NOT GET WRITTEN TO TESTER/ 


-ASCIZ/READ OPERATION DID NOT INCREMENT WORD COUNT/ 


-ASCIi/BUS ADDRESS DID NOT INCREMENT AFTER A READ/<15><12> 


-ASCIZ/OPERAT 10ON/ 
-ASCIZ/ INFORMATION DID NOT READ FROM TESTER/ 


eASCIZ/THIS IS THE CONTENTS OF THE RH REGISTERS/ 


-ASCII/ALL BITS DID NOT GET TRANSFERED DURING A/<15><12> 


-ASCIZ/READ OPERATION/ 


SEQ 0151 


MASSBUS RH70 AND RH11 piaget ic 


CZRHBF P11 


26-JUL-79 


01 
020116 


10:1 


044524 


020104 
052101 


047111 
031123 


051440 
020116 
020063 


000012 
042526 
051104 


J 12 


MACY11 30A(1052) nr 10:39 PAGE 153 
END OF PASS ROUTIN 


—EM150: 


EM151: 


EM152: 


EM153: 


EM154: 


-ASCII/READ OPERATION DID NOT SEEM TO WORK,NO /<15><12> 


-ASCIZ/ INFORMATION WAS TRANSFERED TO STORAGE LOC. (RBUF)/ 


-ASCII/ALL BITS WHERE NOT TRANSFERED TO TESTER/<15><12> 


-ASCIZ/DURING A WRITE OPERATION/ 


eASCIZ/WRITE OPERATION DID NOT WRITE TO TESTER/ 


-ASCII/DBL SET ON A 2 WORD TRANSFER WITH BAI/<15><12> 


-ASCIZ/SET IN RHCS2/ 


-ASCIZ/DBL SET IN RHCS3 ON A 1 WORD READ FROM/<15><12> 


-ASCIZ/AN EVEN ADDRESS/ 


SEQ 0152 


K 12 

MASSBUS RH70 AND RH11 ty | he MACY11 30A(1052) ee 10:39 PAGE 154 

CZRHBF P11 26-JUL-79 10:13 END OF PASS ROUTIN SEQ 0153 
065362 051505 000123 
065366 041104 0 on ta? EM155: .ASCII/DBL SET ON A 2 WORD WRITE REV. WITH BAI SET/<15><12> 


-ASC1Z/IN RHCS2/ 
-ASCII/DBL SET ON A 2 WORD TRANSFER(WRITE)/<15><12> 


-ASCIZ/FROM AN ODD ADDRESS/ 


-ASCII/DBL DID NOT SET ON A 2 WORD WRITE REV.FROM AN EVEN/<15><12> 


Co 
pears 


-ASCIZ/ADDRESS/ 
-ASCII/DBL SET ON A 2 WORD WRITE REVERSE/<15><12> 


ON) a ce ed cee ce ed ed eed ed ed 
SOUWUBDNAUSWN oO 


81 
81 
81 
81 
81 
81 
81 
81 
81 
81 


-ASCIZ/FROM AN ODD ADDRESS/ 


-ASCII/DBL SET ON A 3 WORD WRITE REVERSE/<15><12> 


-ASC1Z/FROM AN ODD ADDRESS/ 


047040 -ASCII/DBL DID NOT SET ON A 2 WORD READ FROM AN/<15><12> 
051440 052105 





L 12 
MASSBUS RH70 AND RH11_DIAGNOSTIC MACY11 30A(1052) 26=JUL-79 10: 
CZRHBF .P11 26-JUL-79 10:13 END OF PASS ROUTINE 


020116 020101 
047527 0421 


39 PAGE 155 
SEQ 0154 


eASCIZ/EVEN ADDRESS/ 


BZ SASS 
wi 


-ASCII1/DBL SET ON A 2 WORD READ FROM/<15><12> 


RR 
SOz=EN Oz SOrEN o> 


S 
oOo U—NOW 


So 


4 Ww 
Nu 
N U—NOW 


020116 
042101 
000123 


-ASCIZ/AN ODD ADDRESS/ 


-ASCIJ/DBL SET ON A 2 WORD READ REVERSE/<15><12> 


RGRR GR SF 


So 
w 


-ASC1Z/FROM AN EVEN ADDRESS/ 
-ASCII/DBL DID NOT SET ON A 2 WORD READ REVERSE/<15><12> 


042122 

020104 

051522 
020115 -ASCIZ/FROM AN ODD ADDRESS/ 
042104 
042522 


051440 : .ASCII/DBL SET ON A 3 WORD READ FROM/<15><12> 


-ASCIZ/AN EVEN ADDRESS/ 


-ASCII/DBL DID NOT SET ON A 3 WORD READ REVERSE/<15><12> 


005015 
040440 -ASCIZ/FROM AN EVEN ADDRESS/ 





M12 
MASSBUS RH70 AND RH11_DIAGNOSTIC MACY11 30A(1052) 26=-JUL=79 10:39 PAGE 156 
CZRHBF P11 26-JUL=79 10:13 END OF PASS ROUTINE SEQ 0155 


22 051040 EM171: .ASCIZ/TRE READS AS SET PGE AND SC SHOULD BE SET/ 


044123 EM172: .ASCIZ/SC SHOULD BE SET/ 
041040 


°o 
wi 
nm 
~ 
N 
§ 


000124 
042122 4 131 047111 &M173: .ASCIZ/RDY IN RHCS1 DID NOT CAUSE AN INTERRUPT WITH IE SET/ 


SERERRRRE 
CONAUSWRO 
AR 
<sbolhos 
RRRR 


88 
33 
& 
SS 
RR 
on 
= 
$ 
£ 
So 
z 
— 


066 EM174: .ASCIZ/IE WILL NOT SET IN RHCS1/ 
8221 066714 020114 047516 peels? 


8225 066737 111 goles 040510 &—M175: .ASCIZ/IE HAS AN OPEN GOING TO THE BUS/ 


8230 000 

8231 066777 122 041510 031523 £M176: .ASCIZ/RHCS3 HAS AN ERROR BIT SET/ 

8232 067004 044040 040440 

8233 067012 020116 051105 047522 

8234 067 020122 arth yi 020124 

8236 067! 046104 020124 047101 EM177: .ASCIZ/DLT AND TRE ARE SET,SC SHOULD BE SET/ 
8237 067040 020104 051124 020105 

8238 067046 051101 020105 042523 

8239 067054 026124 041523 051440 


8240 067062 047510 046125 020104 
8241 067070 “es 051440 052105 


8243 067077 110 041111 ate EM200: .ASCIZ/HIBYTE ,LOBYTE GATE FOR RHWC NOT WORKING PROPERLY/ 


7 

5 11 

ey ahead 4h 051105 

8252 067161 110. 041111 052131 EM201: .ASCIZ/HIBYTE ,LOBYTE GATE FOR RHDB NOT WORKING PROPERLY/ 


MASSBUS 
CZRHBF 


HBF .P 1 


rs 
WO 
= 


oo 
vi 
NAOf—uM 


EN 


ZATIUNS 
nNn— 


At I 
ree 


~ ad ax 
RIGSES 


RRGR 
NAO 


051124 
051105 
042040 
047117 
020124 
041520 
020040 


RH70 AND RH11_DIAGNOSTIC 
1 26-JUL-79 


10:13 


RLLRSF 
S=S2SS 
SaNSROoA— 
N-sOOMUs— 


042510 


S28 


DARRA AVRUARR 
O02 =—CONO—-0o= 
NNN? ANNES 


g 
N 
wi 
Nm 
N 


020107 
051105 


020106 
020123 


051440 
020104 
051105 


MACY11 30A(1052) 26=JUL-79 


N 12 
10:39 PAGE 157 


END OF PASS ROUTINE 


EM202: 


EM203: 


EM204: 


EM205: 


EM206: 


EM207: 


DH1: 


-ASCIZ/HIBYTE ,LOBYTE GATE FOR RHBA NOT WORKING PROPERLY/ 


-4SCIZ/THE BUS ADDRESS IS INCORRECT IT SHOULD BE 15000/ 


eASCIZ/TESTER DATA BUFFER DOES NOT CONTAIN THE CORRECT INFO/ 


-ASCIZ/RH DID NOT INTERUPT LOOK AT CS1 TO SEE IF IE IS SET/ 


eASCIZ/RHWC SHOULD BE ZERO/ 
»ASCIZ/TRANSFER WAS DONE ON PORT B/ 


-ASCII/PC TEST RHWC CONTENTS RHWC/<15><12> 


SEQ 0156 


Omar, RH70 AND RH11 pias iC 


RHBF .P11 
8309 067652 
067660 


26-JUL-79 


020040 
051505 


MACY11 30A(1052) 
END OF PASS ROUT 


DH2: 


DH3: 


DH4: 


DHS: 


a ners 
-ASCIZ/ NO. 
-ASCII/PC TEST 
eASCIZ/ NO. 
-ASCI1I/PC TEST 
eASCIZ/ NO. 
-ASCII/PC TEST 
eASCIZ/ NO. 
-ASCII/PC TEST 


13 
10: 


RHBAE 


RHBA 


RHDB 


RHCS2 


39 PAGE 158 


SHOULD HAVE BEEN/ 


CONTENTS RHBAE/<15><12> 


SHOULD HAVE BEEN/ 


CONTENTS RHBA/<15><12> 


SHOULD HAVE BEEN/ 


CONTENTS RHDB/<15><12> 


SHOULD HAVE BEEN/ 


TRE AND SC/<15><12> 


SEQ 0157 


MASSBUS ae AND RH11 wh ke 


CZRHBF 


8365 


8407 


R 
SELRELR 


RELLRELLRLLLE 
Soeseununae 


26-JUL-79 10:1 


070352 
070360 


07 
071014 


020124 


bE: 
042522 
051440 


020040 
027117 
02 


0040 
027117 
040440 
051523 


020040 
051505 
041115 


052116 


C 13 
MACY11 30A(1052) 26=JUL=79 10 
END OF PASS ROUTINE 


:39 PAGE 159 


-ASC1Z/ NO. BITS/ 
DH11: .ASCII/PC TEST CONTENTS OF /<15><12> 
-ASCIZ/ NO. RHCS2/ 
DH34: .ASCII/PC | TEST DEVICE/<15><12> 
-ASCIZ/ NO. CODE/ 


DH35: -ASCIZ/PC/ 


DH36: .ASCII/PC TEST FAILING/<15><12> 
eASCIZ/ NO. ADDRESS/ 

DH41: .ASCIZ/PC TEST NUMBER/ 

DH52:  .ASCII/PC TEST ADDRESS DATA  RHAS/<15><12> 
eASCIZ/ NO. CONTENTS/ 


SEQ 0158 


D 13 
MASSBUS RH70 AND RH11_DIAGNOSTIC MACY11 30A(1052) 26-JUL=79 10:39 PAGE 160 


CZRHBF .P11 26-JUL=79 10:13 END OF PASS ROUTINE SEQ 0159 
071016 020040 DH71:  .ASCI1/PC TEST DEVICE/<15><12> 
020040 


eASCIZ/ NO. NUMBER/ 


-ASCII/PC TEST CONTENTS UF /<15><12> 
eASCIZ/ . REGISTER/ 
-ASCIZ/PC 


-ASCIZ/PC - RHBAE RHBA RHWC/ 


-ASCIZ/PC - RHCS1  RHBA RHWC/ 


053510 
-ASC1Z/PC ° RHCS2/ 


-ASCIZ/PC . RHCS1/ 


-ASCIZ/PC - RHBAE ~ RHBA RHCS2 = RHC S3/ 


020040 020040 -ASCIZ/PC , RHTDB/ 
051505 020124 





E 13 
MASSBUS RH70 AND RH11_DIAGNOSTIC MACY11 30A(1052) 26-JUL=79 10:39 PAGE 161 
CZRHBF .P11 26-JUL-79 10:13 END OF PASS ROUTINE SEQ 0160 
8477 071512 047516 020056 053105 
8478 071520 047105 042101 020040 
8479 071526 044122 042124 000102 
071534 041520 020040 020040 DH146: .ASCIZ/PC TEST NO. RHCS1 RHCS2 RHWC/ 


8486 
4434 071601 120 poo? 020040 DH147: .ASCIZ/PC TEST NO. RBUF RHTDB/ 


0716 
94 pers 122 041110 042501 DH170: .ASCIZ/RHBAE RHBA RHCS3/ 
8496 
8497 071665 120 peoiae 020040 DH171: .ASCIZ/PC TEST NO. RHCS3/ 


00 0717 000 

8501 071713 0 24 yates 020040 DH172: .ASCII/PC TEST DEVICE RHCS2/<15><12> 
042040 

020105 

06 

8507 071752 020040 020040 020040 eASCIZ/ NO. NUMBER / 

508 0717 


0 20040 0040 
8510 fade 041115 051105 020040 


000 
8512 072004 -EVEN 
8513 072004 001116 003454 003444 DTI: -WORD $ERRPC,TSTNM,WC,$REGO,0 


003454 003416 DT2: -WORD $ERRPC,TSTNM,BAE ,$REGO,0 
d0sas4 003414 DT3: -WORD $ERRPC,TSTNM,BA,$REGO,0°- 
Sosase 003426 DT4: -WORD $ERRPC,TSTNM,DB,$REGO,0 
003494 003422 DTS: -WORD S$ERRPC,TSTNM,CS2,$REGO,0 
oe 003454 003422 DT11: .WORD SERRPC,TSTNM,CS2,0 
8525 072076 001116 003454 003434 DT34: .WORD SERRPC,TSTNM,DT,0 


001116 000000 DT35: .WORD S$ERRPC,0 
8528 072112 001116 003454 003330 DT36: .WORD $ERRPC,TSTNM,RHCS1,0 


Co 

wn 

— 

co 
8888888888 
— sd ts et SS —) 1 I 
Sura auh 
AMAMANMANMAN 


Co 

8 

S 
Sseeo 
NIINY 


8 072122 001116 003454 000000 D141: .WORD $ERRPC,TSTNM,0 
8531 072130 001116 003454 003416 DT52: .WORD $ERRPC,TSTNM,BAE,$REGO,AS,0 
8532 072136 001162 003412 000000 * 


F 13° 
MASSBUS RH70 AND RH11 ‘Sey tet i MACY11 30A(1052) ee 10:39 PAGE 162 
CZRHBF P11 26-JUL-79 10:13 END OF PASS ROUTIN SEQ 0161 


8533 072144 001116 003454 004100 DT71: .WORD SERRPC,TSTNM,RBUF ,0 
5 000000 


8534 072152 

8535 072154 001116 003454 003416 DI76: .WORD S$ERRPC,TSTNM,BAE,BA,0 
8536 072162 003414 000000 

8537 072166 001116 003454 003416 DT105: .WORD SERRPC,TSTNM,BAE,BA,WC,0 
8538 072174 003414 003444 000000 

8539 072202 001116 003454 003420 DT111: .WORD SERRPC,TSTNM,CS1,BA,WC,0 
8540 072210 003414 003444 000000 

8541 072216 001116 003454 003420 DT121: .WORD SERRPC,TSTNM,CS1,CS2.0 
8542 072224 003422 000000 

8543 072230 001116 003454 003420 DT130: .WORD $ERRPC,TSTNM,CS1,0 

8544 072236 000000 


6 003454 003416 DT132: .WORD SERRPC,TSTNM,BAE,BA,(S2,(S3,0 
4 003422 003424 


16 003454 004000 DT142: .WORD SERRPC,TSTNM,EVENAD,$REGO,0 
é b0se54 003420 DT146: .WORD $ERRPC,TSTNM,CS1,CS2,WC,0 

é 003454 004100 DT147: .WORD $ERRPC,TSTNM,RBUF ,$REGO,0 
8554 072316 003416 003614 003424 DT170: .WORD BAE,BA,CS3,0 

8556 072326 001116 003454 003424 DT171:.WORD SERRPC,TSTNM,CS3,0 

8558 079336 001116 teked 004100 DT172: .WORD $ERRPC,TSTNM,RBUF ,CS2,0 


-EVEN 
8561 072350 000 000 000 DF1: -BYTE 0,0,0.0 
8562 072353 000 
8563 072354 000 000 000 DF: -BYTE 0,0,9,0 
564 072357 000 
8565 072 000 000 000 ODF3: -BYTE 0,0,0,0 
566 072363 000 
8567 072 000 000 000 DF4: -BYTE 0,0,0,0 
568 072367 000 
8569 072370 000 000 000 DFS: -BYTE 0,0,0,0 
8570 072373 000 
8571 072374 000 000 000 DF11: .BYTE 0,0,0 
8572 072377 000 000 000 DF34: BYTE 0,0,0 
8573 072402 000 DF35: .BYTE 0 
8574 072403 000 000 000 DF36: .BYTE 0.0.0 
8575 072406 000 000 DF41: .BYTE 0,6 
8576 072410 000 000 000 DF52 -BYTE 0,0,0,0.0 
8577 072413 000 000 
8578 072415 000 000 000 DF71 BYTE 0,0,0 
8579 072420 000 000 000 DF76 BYTE 0,0,0,0 
8580 072423 000 
8581 072424 000 000 DF105 BYTE 0,0,0,0,0 
8582 072427 000 000 
8583 072431 000 000 000 DF132: .BYTE 0,0.,0,0,0,0 
8584 072434 000 000 000 
8585 072437 000 000 000 DF170 BYTE 0,0,0 
8586 072442 000 000 000 DF172: .BYTE 0,0,0,0 
8587 072445 000 
8588 EVEN 
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-SBTTL SCOPE HANDLER ROUTINE 


SAAR REEAAEEERE ARERR RREEREEE EE 


SRTHIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
 #AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY _ (DISPLAY<7:0>) 


:39 PAGE 165 


SEQ 0164 


;*AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:0 
:*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 


>*SW14=1 LOOP ON TEST 
7*SWi1=1 INHIBIT ITERATIONS 
3*SWO9=1 LOOP ON ERROR 
3 *SWO8=1 LOOP ON TEST IN SWR<7:0> 
> *CALL 
¢* SCOPE ;;SCOPE=I0T 
$SCOPE : 
CKSWR 7zTEST FOR CHANGE IN SOFT-SWR 
1$: BIT #B1T14,aSWR : ¢LOOP ON PRESENT TEST? 
BNE SOVER YES IF SW14=1 
;MAHHASTART OF CODE FOR THE XOR TESTERAAAAH 
$XTSTR: BR 6$ self RUNNING ON THE "XOR'’ TESTER CHANGE 
THIS INSTRUCTION TO A ‘NOP"* (NOP=240) 
MOV @VERRVEC ,- (SP) : 7 SAVE THE CONTENTS OF THE ERROR VECTOR 
MOV A5$ ,Q#ERRVEC ee FOR TIMEOUT 
TST a4177060 OUT ON XOR? 
MOV (SP) +, @#ERRVEC :ZRESTORE THE ERROR VECTOR 
BR $SVLAD :GO_ TC THE NEXT TEST 
5$: CMP (SP) +, (SP)+ :CLEAR THE STACK AFTER A TIME OUT 
MOV (SP) +, @#ERRVEC $ URESTORE THE ERROR VECTOR 
BR 7$ ;LOOP ON THE PRESENT TEST 
6$: ;MAAHAEND OF CODE FOR THE XOR TESTERMAMAM 
BIT #B1T08,aSWR :sLOOP ON SPEC. TEST? 
BEQ 2s IF NO 
C @SWR ,$TSTNM :30N THE RIGHT TEST? SWR<7 :0> 
BEQ SOVER BR IF YES 
2e$: TSTB SERFLG ; SHAS AN ERROR OCCURRED? 
BEQ 3$ :BR IF NO 
CMPB SERMAX , SERFLG 7 MAX, ERRORS FOR THIS TEST OCCURRED? 
BHI $ :BR_ IF NO 
BIT #BIT09,aSwR ; LOOP ON ERROR? 
BEQ $ IF NO 
7$: ay a eaatiaae >:SET LOOP ADDRESS TO LAST SCOPE 
4$: CLRB SERFLG :2ZERO = ERROR FLAG 
CLR $TIMES 7:CLEAR THE NUMBER OF ITERATIONS TO MAKE 
BR 1$ $4 TO_THE NEXT TEST 
3$: SIT #B1T11,aSWR : INHIBIT ITERATIONS? 
BNE 1$ ::BR IF YES 
TST $PASS s338 FIRST PASS OF PROGRAM 
BEQ 1$ INHIBIT ITERATIONS 
INC $1CNT S:INCREMENT ITERATION COUNT 
CMP $TIMES,SICNT +s CHECK THE NUMBER OF yt arth MADE 
BGE SOVER :BR_IF MORE ITERATION REQUIRED 
1$: MOV #1,$1CNT i :REINITIALIZE | THE ITERATION COUNTER 
MOV SMXCNT.$TIMES ;;SET NUMBER OF ITERATIONS TO DO 
$SVLAD: INCB $STSTNM ::COUNT TEST NUMBER 
MOV (SP) ,$LPADR ::SAVE SCOPE LOOP ADDRESS 
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MOV (SP) ,SLPERR ;SAVE ERROR LOOP ADDRESS 

CLR SESCAPE oeCh EAR THE ESCAPE FROM ERROR ADDRESS 

MOVB #1 , SERMAX ONLY ALLOW ONE(1) ERROR ON NEXT TEST 
SOVER: MOV $TSTNM,a@D1ISPLAY : ;DISPLAY TEST NUMBER 

MOV SLPADR, (SP) FUDGE RETURN ADDRESS 


TI : FIXES PS 
$MXCNT: 100 MAX. NUMBER OF ITERATIONS 
.SBTTL POWER DOWN AND UP ROUTINES 


STARA 


zPOWER DOWN ROUTINE 


$PWRDN: MCV #$ILLUP, a4PWRVEC ‘brio FOR FAST UP 
MOV #340, BHPWRVEC+2 : PRIO:7 
MOV RO,-(SP) 3ZzPUSH RO ON STACK 
MOV R1,-(SP) :2PUSH R1 ON STACK 
MOV R2,-(SP) 3;PUSH R2 ON STACK 
MOV R3,-(SP) :zPUSH R3 ON STACK 
MOV R4,-(SP) :zPUSH R4 ON STACK 
MOV R5,-(SP) 7zPUSH RS ON STACK 
MOV @SWR,-(SP) 72PUSH @SWR ON STACK 
MOV SP, SSAVR6 sz SAVE SP 
aa #SPWRUP, @APWRVEC ;;SET UP. VECTOR 
BR 72 7 ZHANG UP 


ICICI IOI IOS III IIIA ISSA ISIS IS III IIIS AISI SAIS SISA ISISISASIAACSCSA ACM. 
“ POWER UP ROUTINE 
$PWRUP: MOV MSILLUP, AAPWRVEC a FAST DOWN 


MOV $SAVR6, SP 32GET 

CLR SSAVR6 zsWAIT LOOP FOR THE TTY 
1$: INC SSAVR6 2 sWAIT FOR THE INC 

BNE 1$ OF WORD 

MOV (SP) +,aSWR 7:POP STACK INTO @SWR 

MOV (SP)+,R5 :sPOP STACK INTO R5 

MOV (SP) +,R4 ::POP STACK INTO R4 

MOV (SP) +,R3 ee STACK INTO R3 


::POP STACK INTO R2 
MOV (SP)+,R1 + ¢POP STACK INTO R1 
3=POP_STACK INTO RO 
MOV #SPWRDN, AAPWRVEC ijSET THE POWER DOWN VECTOR 


MOV #340, aMPWRVEC+2 ; 
:REPORT THE POWER FAILURE 


SPWRMG : are SPOWER 72zPOWER FAIL MESSAGE POINTER 

$ILLUP: HALT 32 THE POWER UP SEQUENCE WAS STARTED 
BR -72 3; BEFORE THE POWER DOWN WAS COMPLETE 

SSAVR6: 0 :ZPUT THE SP HERE 

S$POWER: .ASCIZ <15><12>' POWER’ 


-EVEN 


SEQ 0165 
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-SBTTL TYPE ROUTINE 


FREAK EERE AERERREEREREERREEREEERERRRERRERERE 


 RROUT INE TO TYPE ASCIZ “yy * MESSAGE MUST TERMINATE WITH A 0 at 


: * THE ROUTINE WILL INSERT A NUMBER OF FEED. 
;*NOTE1: S$NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 


:*CALL: 
+1) USING GA TRAP INSTRUCTION 


;+OR 


;HORIZONTAL TAB 


8$: 


TYPE 


MESADR 


MOVB 


NULL CHARACTERS AFTER A LINE 


LL 
S$FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 


-MESAD 
STPFLG 
1$ 


(RO)+,-(SP) 
4$ 

(SP) + 
(SP)+,RO 
#2, (SP) 
——" 
ACRLF , (SP) 
5$ 


(SP) + 


SCHARCNT 
2s 


PC ,STYPEC 
SFILLC,(SP)+ 


2 
$NULL ,- (SP) 
1(SP) 

6$ 

PC, re 
SCHARCNT 
7$ 
PROCESSOR 
#* ,(SP) 
PC, $TYPEC 
aia 
(SP)+ 


:sMESADR iS FIRST ADDRESS OF AN ASCIZ STRING 


21S je A TERMINAL? 


oe IF 
oo IF NO TERMINAL 


AVE RO 
‘ter ADDRESS OF ASCIZ SiRING 
PUSH CHARACTER TO BE TYPED ONTO STACK 
7:BR IF IT ISN'T THE TERMINATOR 
self TERMINATOR POP IT OFF THE STACK 
2 zRESTORE RO 
: sADJUST RETURN PC 
TURN 


; sBRANCH IF <HT> 
7 BRANCH IF NOT <CRLF> 


7zPOP <CR><LF> EQUIV 
:-TYPE A CR AND LF 


seth ees CHARACTER COUNT 

;:GET NEXT CHARACTER 

2260 TYPE THIS CHARACTER 

TIME FOR A CHARS. ? 
NEXT CHAR. 


GET 
tog CHARS. NEEDED 


L NEED TO BE TYPED? 
oo POP THE NULL OFF OF STACK 


7sREPLACE TAB WITH SPACE 
7-TYPE A SPACE 
a POE IF NOT AT 


::POP SPACE OFF STACK 


SEQ 0166 
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BR 2$ 33GET NEXT CHARACTER 
105500 $STYPEC: Mg asTPS 7sWAIT UNTIL PRINTER IS READY 


STYPEC 
000002 105472 2(SP) ,aSTPB ;sLOAD CHAR TO y TYPED INTO DATA REG. 
000015 000002 #CR,2(SP) si1S CHARACTER A CARRIAGE RETURN? 


BNE 1$ :BRANCH IF NO 
073510 : :YES--CLEAR CHARACTER COUNT 


000012 000002 1$: ALF ,2(SP) 2315 CHARACTER A LINE FEED? 
STYPEX CH_IF YES 
INCB (PC)+ 7:COUNT THE CHARACTER 
000000 SCHARCNT: WORD 0 :sCHARACTER COUNT STORAGE 
073512 $STYPEX: RTS PC 
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-SBTTL BINARY TO OCTAL (ASCII) AND TYPE 


iti iiiiiiiiitiiiiiiiiiie) 

SR THIS ROUTINE IS USED TO — ° 16-BIT BINARY NUMBER TO A 6-DIGIT 

+ *OCTAL (ASCII) NUMBER AND TYPE | 

a HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


NUM ,=(SP) ; ;NUMBER TO BE TYPED 
23 CALL FOR TYPEOUT 
; 6 FOR NUMBER OF DIGITS TO TYPE 


23 T=TYPE LEADING ZEROS 
;0=SUPPRESS LEADING ZEROS 


‘ SSTYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
+ *$TYPOS OR $TYPOC 
3 *CALL: 

i* MOV NUM ,~(SP) 7 NUMBER TO BE TYPED 

" PON ;zCALL FOR TYPEOUT 


* 
— HERE FOR TYPEOUT OF A 16 BIT NUMBER 


MOV NUM, -(SP) ; NUMBER TO BE TYPED 
TYPOC ;zCALL FOR TYPEOUT 


: a(SP) ,-(SP) 2 ¢PICKUP THE MODE 
073737 MO 1(SP) SOF ILL : =LOAD ae FILL SWITCH 
(SP)+,S$OMODE+1 ;; F DIGITS TO TYPE 
#2, (SP) ‘ADJUST RETURN ADDRESS 


BR STYPON 
000001 073737 : #1,S$OF ILL :2SET THE ZERO FILL SWITCH 
000006 073741 MO #6, SOMODE+1 7-SET FOR SIX(6) DIGITS 
000005 073736 : hl ITERATION COUNT 


N 
M 


073514 


000001 
073741 
000002 


se ER R5 
073741 SOMODE+1 oR4 7:GET THE NUMBER OF DIGITS TO TYPE 


000006 AD #6 ,R4 ::SUBTRACT IT FOR MAX. ALLOWED 
073740 R4 , SOMODE 2-SAVE_IT FOR USE 

073737 SOF ILL,R4 2 2GET THE ZERO FILL SWITCH 
000012 ag RS R 


sett WORD 
$IRO TATE MSB I INTO. a, 


O DO MSB 
73FORM THIS DIGIT 


: R 3:GET LSB OF THIS DIGIT 
073740 fib Bl THIS DIGIT? 
BP F NO 


7$ 
177770 . i3GET RID OF JUNK 
BN 4$ FOR 0 
£ SUPPRESS. THIS 0? 
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4$: RS 3 sDON® T SUPPRESS ANYMORE 0'S 
5$: 


; OR TYP 
:GO TYPE THIS DIGIT 
7$: COUNT BY 1 
2$ ::BR IF MORE TO DO 
7-BR IF DONE 
32 INSURE LAST DIGIT ISN*T A BLANK 
2260 DO — DIGIT 


; ORE R3 
2eSET The STACK FOR RETURNING 


(SP) +. (SP) 
:RETURN 
8$: 33 STORAGE FOR ASCII DIGIT 
.BYTE . 
SOCNT: .BYTE 


;OCTAL 
SOFILL: .BYTE :-ZERO FILL SWITCH 
073740 SOMODE: .WORD 3 ;NUMBER OF DIGITS TO TYPE 





MASSBUS _RH70 AND RH11_DIAGNOSTIC 


CZRHBF .P11 


073742 


074122 


26-JUL-79 


10:13 


020200 
000020 


000055 
074156 
000040 


074146 


000001 
000060 
000040 


000010 


177777 


000001 


177777 


177776 


MACY11 30A(1052) 


8 
26-JUL-79 


14 
10:39 PAGE 171 


CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 
-SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


{RARER ARARAAEARERAERRAERERERERERERREERRRERAREREERERRERKEREREREREK EHH 


SATHIS ROUTINE IS USED TO CHANGE A 16-81T BINARY NUMBER TO A 5-DIGIT 


IS POS 


; *S1GNED DECIMAL (ASCII) NUMBER AND TYPE If. DEPENDING ON WHETHER THE 
; “NUMBER ITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 


;*BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 


Py 
Ps 
:* 
. 


STYPDS: 


7$: 


8$: 


; *REPLACED WITH SPACES. 
*CALL: 


NUM , = (SP) 


RO,-(SP) 


6$ 
1(SP) ,~1(R3) 
#'°0,R2 


(SP) + 

9$ 

-1(SP) ,-2(R3) 
(R3) 

(SP)+,R5 


(SP)+,R3 
(SP)+,R2 


;3;PUT_THE BINARY NUMBER ON THE STACK 
33G0 TO THE ROUTINE 


STACK 


GET THE INPUT 


ee I 
77SET THE FIRST CHARACTER TO A BLANK 
23 CLEAR THE BCD NUMBER 
T THE CONSTANT 
3 FORM THIS BCD DIGIT 
F DONE 


I 
ZZ INCREASE THE BCD DIGIT BY 1 


::ADD BACK THE CONSTANT 
ne IF BCD DIGIT=0 
L_ THROUGH IF 0 


IF 
:3STILL = LEADING 0°S? 


BR IF NO 
SIYES=-SET THE S 
MAKE THE so Biel SCII 
7IMAKE_IT A SPACE IF NOT ALREADY A S 


IT 
:sPUT_THIS CHARACTER IN THE OUTPUT BUFFER 


T THE LSD 
GO CHANGE TO ASCII 
Z24AS THE LSD THE FIRST NON-ZERO? 


3s YES==SET aaniten TYPING 
3zPOP STACK INTO R5 


33POP STACK INTO R3 
3:POP STACK INTO R2 


SEQ 0170 
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CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


$DTBL: 


$DBLK: 


-BLKW 


(SP)+,R1 :3PCP STACK INTO RI 
(SP) +°RO + POP STACK INTO RO 
S$DBLK [NOW TYPE THE 
3(SP) ,4(SP) <TADJUST THE STACK 
(SP) +. (SP) 

: RETURN TO USER 
4 


SEQ 0171 
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-SBTTL ERROR MESSAGE TYPEOUT ROUTINE 


FAA EAREREREEREEERRRRREREKEEERREREERAERERERERRRREREREERRRRRRERH 


>*THIS ROUTINE USES THE ‘ITEM CONTROL BYTE’ ($ITEMB) TO DETERMINE WHICH 


REPORTED. IT THEN OBTAINS, FROM THE 


“ERROR al (SERRTB), 


;*AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR 


; *ERROR IS TO BE 

SERRTYP: 
TYP ,SCRLF 
MOV RO,-(SP) 
CLR RO 
BISB a4$1TEMB,RO 
BNE 1$ 
MOV SERRPC ,~(SP) 
TYPOC 
BR 6$ 

1$: DEC RO 
ASL RO 
ASL RO 
ASL RO 
ADD #SERRTB,RO 
MOV (RO) +,2$ 
BEQ 3$ 
TYPE 

2s: -WORD 0 
TYPE -SCRLF 

3$: MOV (RO) +,4$ 
BEQ 5$ 
TYPE 

4$: -WORD 0O 
TYPE -SCRLF 

5$: MOV (RO) ,RO 
BNE 7$ 

6$: MOV (SP)+,RO 
TYPE SCRLF 
RTS PC 

7$: 
MOV a(RO)+,-(SP) 
TYPOC 
TST (RO) 
BEQ 6$ 
TYPE 8$ 

7$ 
8$: 


:# CARRIAGE RETURN’’ & "LINE FEED’ 
S:PICKUP THE ITEM INDEX 

:r1F ITEM NUMBER IS ZERO, JUST 

- ERROR 


ESS 
+260 TYPE=-OCTAL ASCIICALL DIGITS) 


:GET OUT 
i ADJUST. TH a i" SO THAT IT WILL 
ae OR THE ERROR TABLE 


::FORM TABLE POINTER 
;:PICKUP ‘ERROR MESSAGE’’ POINTER 
;:SKIP TYPEOUT IF NO POINTER 
Zi TYPE THE "ERROR MESSAGE'’ 

RROR MESSAGE’ POINTER GOES HERE 
: CARRIAGE RETURN’ NE FEED" 
:3PICKUP “DATA HEADER" POINTER 


OUT IF 
7: TYPE THE ‘DATA eee 


NTER GOES HERE 
32° CARRIAGE & ‘LINE FEED’ 


+ PICKUP = eal POINTER 
TYPE THE DAT. 


7 ZRESTORE RO 
+ 3" CARRIAGE RETURN'’ & “LINE FEED'' 
ETURN 


sSAVE a(RO)+ FOR TYPEOUT 
+260 TYPE-~OC TAL Hg DIGITS) 
2i1S page| ANOTHER NUMBER? 
+ TYPE TWO(2) SPACES 


+:TWO(2) SPACES 


SEQ 0172 
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-SBTTL ERROR HANDLER ROUTINE 


[RRR RA RARER RARER EEA RARER ERE REAR ARR REE EERE ERE 
SR THIS ROUTINE WILL_INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
; *SAVE sg Beas ITEM — AND THE ADDRESS OF THE ERROR CALL 


:*AND GO NB ON 
: * THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
SW15=1 HALT ON ERROR 


Su13=1 INHIBIT ERROR TYPEOUTS 
:*SW10=1 BELL ON ERROR 

*SWO9=1 LOOP ON ERROR 

7 *CALL 

s* , N ;;ERROR=EMT AND N=ERROR ITEM NUMBER 


074322 SERROR: 
7-TEST FOR oe IN SOF T-SWR 
7$: SERFLG 23SET THE ERROR FLAG 
BEQ 7$ ::DON'T LET THE FLAG GO TO ZERO 
STSTNM,@DISPLAY ::DISPLAY TEST NUMBER AND ERROR FLAG 
Pe ;;BELL ON ERROR? 


SERTTL OF ERRORS 
(SP) , SERRPC SIGET ADDRESS OF ERROR INSTRUCTION 


#2, SERRPC 
@SERRPC ,$1TEMB 2 STRIP AND SAVE THE — ITEM CODE 
~ "ic amaaaen 


BNE OUTS 
050140 PC, TSTN"B ::GO TO USER ERROR ROUTINE 
001223 - SCRLF 


104514 2$: aSwR ;HALT ON ERROR 
3$ 2 SKIP IF CONTINUE 


HALT ON ERROR! 
z:TEST FOR CHANGE IN SOFT-SWR 
001000 : #BITO9,aSWR ; ae a ERROR SWITCH SET? 


4 
SLPERR, (SP) FUDGE RETURN FOR LOOPING 
$SESCAPE ag FOR AN ESCAPE ADDRESS 


5$ IF NONE 
013716 SESCAPE,(SP)  2:FUDGE RETURN ADDRESS FOR ESCAPE 
000002 ‘ + ;RETURN 
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TTY INPUT ROUTI 
-SBTTL TTY INPUT ROUTINE 


J FEAR ARERR KERR REREKERERREEREREREEEEREREREREEROREE EEE 
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SEQ 0174 


-ENABL LSB 

STKCNT: .WORD 0 > <NUMBER OF ITEMS IN QUEUE 
STKQIN: .WORD 0 3; INPUT POINTER 

$TKQOUT: .WORD 0 ; OUTPUT POINTER 

tee -BLKB 8. 7-TTY KEYBOARD QUEUE 


:*TK INITIALIZE ROUTINE 
:*THIS ROUTINE WILL INITIALIZE THE TTY KEYBOARD INPUT QUEUE 
;*SETUP THE INTERRUPT VECTOR AND TURN ON THE KEYBOARD INTERRUPT 


7 *CALL: 

7* JSR PC, $TKINT 

;* RETURN 

$TKINT: CLR STKCNT sCLEAR COUNT OF ITEMS IN QUEUE 
MOV #STKQSRT ,STKQIN 3 IMOVE THE oh hat a ADDRESS OF THE 
MOV $TKQIN, $TKQOUT ;QUEUE INTO THE INPUT & OUTPUT POINTERS. 
MOV WSTKSRV, @4TKVEC iT INITIALIZE THE KEYBOARD VECTOR 
MOV #200, @#TKVEC+2 72° BR’’ LEVEL ; 
TST a$TkKB <F LEARS DONE FLAG 
MOV #100, a$TKS 7 ENABLE TTY KEYBOARD INTERRUPT 
RTS PC ; RETURN TO CALLER 


:*TK SERVICE ROUTINE 

7 *THIS preyed! WILL SERVICE THE TTY KEYBOARD INTERRUPT 

:*BY READING THE CHARACTER FROM THE INPUT BUFFER AND PUTTING 

:*IT IN THE QUEUE. 

:*IF THE CHARACTER IS A ‘'CONTROL-C"' (“C) STKINT IS CALLED AND 

; *UPON RETURN EXIT IS MADE TO THE ‘'CONTROL-C'' RESTART ADDRESS (200) 


$TKSRV: MOVB = a$TKB,-(SP) z:PICKUP THE CHARACTER 
BIC wci77 (SP) z:STRIP THE JUNK 
CMP ) #3 S IT A CONTROL C? 
BNE (CH IF NO 
TYPE Senric + TYPE A CONTROL-C (*C) 
JSR PC, $TKINT ‘INIT THE KEYBOARD 
TST (SP) + 7: CLEAN UP STACK 
JMP 200 :: CONTROL C RESTART 

1$: CMP (SP) #7 3318 ITA CONTROL G? 
BNE ‘BRANCH IF 
CMP ASWREG, SWR iI SOFT-SWR. SELECTED? 
BEQ 7:G0 TO SWR CHANGE 

2$: 
CMP #8. ,$TKCNT i31S THE QUEUE FULL? 
BNE 3$ CH IF NO 
TYPE »SBELL SZRING THE TTY BELL 
TST (SP) + :3CLEAN CHARACTER OFF OF STACK 
BR 5$ XIT 

3$: CMP (SP) 423 isis IT A CONTROL-S? 
BNE 32$ 33 CH IF NO 
CLR asTkS *:DISABLE TTY KEYBOARD INTERRUPTS 
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CZRHBF P11 26-JUL-79 10:13 TTY INPUT ROUTI SEQ 0175 


074654 7 fhe ae ne OFF STACK 
104262 31$: sty FOR A CHAR 
31$ :LOOP_UNTIL ITS THERE 
104256 ; HARACTER 


177600 
000021 (SP) +,421 
31$ 


é CH IF NO 
000100 MOV #100, a$TKS : :REENABLE TTY KEYBOARD INTERRUPTS 


RE 
074462 : STKCNT is : COUNT THIS CHARACTER 
000140 (SP) ,4140 UPPER CASE? 


(SP) 4175 
4$ 
#40, (SP) 
(SP) +,@$TKQIN 
STKQIN ; 
074500 a ;;GO OFF 


$ oe CH IF NO 
074470 074464 MOV WSTKQSRT ,STKQIN ;;RESET THE POINTER 
5$: 7 RETURN 


DIO OI SISIOISIOISIOIIOIOISIOIOIOISIOIOIOIDIOIIOIUIOIIIOIIIOIIIOISIOIIIOIIOIIIOIUIOI DIDI IOI IODIDE 
+ kSOF TWARE SWITCH REGISTER CHANGE ROUTINE. 
;*ROUTINE IS ENTERED FROM THE TRAP HANDLER, AND WILL 
>*SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP 
;*CALL WHEN OPERATING IN TTY INTERRUPT MODE. 

orate 001140 $CKSWR: 44 _— -SWR 22S THE o * ae SELECTED 


1 
a$TKS 


15$ 
a$TKB,-(SP) ss YES 
ace (SP) MAKE IT 7-B1T ASCII 
MP (SP) zi18 IT A CONTROL- 
075020 001300 2$ IF NOT. PUT IT in THE TTY QUEUE 


DIPS AISI SIISISIDISISIOISIUISIIIOISIOIOIIUIOIUIOIIOIIOIOIOIOI TOI IOI TOIT TOI TOT TOI I TOT I TIE 

;*CONTROL IS PASSED TO THIS POINT FROM EITHER THE TTY INTERRUPT SERVICE 

;*ROUTINE OR FROM THE SOFTWARE SWITCH REGISTER TRAP CALL, AS A RESULT OF A 

;*CONTROL-G BEING TYPED, AND THE SOFTWARE SWITCH REGISTER BEING SELECTED. 
075022 Meare? 001134 000001 6$: CPB SAUTOB.A1 ;cAR 4 a IN AUTO-MODE? 


ES 
(SP)+ SICLEAR CONTROL-G OFF STACK 
074500 PC, $TKINT A THE TTY INPUT QUEUE 
104100 a$TKS DISABLE TTY KEYBOARD INTERRUPTS 
000001 001135 #1, SINTAG 7:SET INTERRUPT MODE INDICATOR 


075676 T -SCNTLG :zECHO THE CONTROL-G (*G) 
075703 : . SMSWR :-TYPE CURRENT CONTENTS 
000176 MO SWREG,- (SP) >ZSAVE SWREG FOR TYPEOUT 
2260 TYPE=-OCTAL ASCII(ALL DIGITS) 
075714 oe ;PROMPT FOR NEW SWR 
5046 CL ~(SP) 
105777 104040 : a$TKS 3:CHAR THERE? 
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075104 100375 


9177 075106 117746 
075112 042716 


9180 075116 021627 


104034 
177600 


000003 
075664 
000006 
001135 
012777 000100 


075152 000290 


075156 
075162 
9192 075164 
075170 
075174 


000025 


075671 
000006 


075176 000015 
000004 
000002 
062706 000006 
001223 
001135 
000100 


073444 
000060 


000067 


000060 
000002 


000002 
177776 
001222 
075326 


000001 
103772 


103720 


000001 
103676 


po Sh 7 suri 
Y INPUT ROUT] 


9$: CMP 


208: ADD 


17$: INC 


BR 
183: TYPE 

BR 
-DSABL LSB 


H 
26-JUL=79 
7$ 


@$TKB,-(SP) 
#°C177, (SP) 


(SP) #3 
9$ 

-SCNTLC 
#6,SP 
er 
#100, a$TKS 
200 


(SP) ,425 
10$ 


P) ,@SWR 
p 


LF 
+ i 
#100, a$TKS 


PC, $TYPEC 
iz ae 


(SP) ,467 
18$ 

#60, (SP) + 
2(SP) 


2(SP) 

- alltel 
, SQUES 

20$ 


1 
1 


4 
0: 


39 PAGE 177 


si 1F NOT TRY AGAIN 


::PICK UP CHAR 
33MAKE IT 7-BIT ASCII 


:e1S IT A CONTROL=C? 
oe CH IF NOT 
7-YES, ECHO CONTROL-C (*C) 
2: CLEAN UP STACK 

ame i fe KEYBOARD INTERRUPTS? 


TALLOW TTY KEYBOARD INTERRUPTS 
z=: CONTROL=C RESTART 


31S IT A_CONTROL-U? 

ee CH IF NOT 

5s Os ECHO CONTROL=U (“U) 
GNORE PREVIOUS INPUT 
S:LET'S TRY IT AGAIN 


21S IT A <CR>? 


CH IF NO 
ast IS IT THE FIRST CHAR? 
CH _IF YES 


[SAVE NEW SWR 
3 CLEAR UP STACK 


AND < 
fee re Ma KBD. INTERRUPTS? 
7 sRE-ENABLE TTY KBD INTERRUPTS 


; sBRANCH If YES 
; sBRANCH IF YES 
>:STRIP-OFF ASCII 
221S THIS THE FIRST CHAR 
ee CH IF YES 

- SHIFT PRESENT 
:: CHAR OVER TO MAKE 


7z:GET THE NEXT ONE 
zi TYPE ?<CR><LF> 
zz SIMULATE CONTROL-U 


FARRAR EER EERE KK EERE ERE RRR EERE ERE KEE ERE EEE 


:STHIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 


*CALL: 


te RDCHR 


32GET A CHARACTER FROM THE QUEUE 


SEQ 0176 
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MASSBUS RH70 AND RH11 DIAGNOSTIC MACY11 30A(1052) 26=JUL=-79 
CZRHBF .P11 26-JUL=79 10:13 TTY INPUT ROUTINE SEQ 0177 
9231 3* RETURN HERE 77 CHARACTER IS ON THE STACK | 
9232 ;* ;;WITH PARITY BIT STRIPPED OFF 
353 
9235 075330 011646 $RDCHR: MOV (SP) ,-(SP) : sPUSH DOWN THE PC AND 
9236 075332 016666 000004 000002 MOV 4(SP),2(SP) 77 THE PS 
9237 075340 005066 000004 CLR 4(SP) st READY FOR A CHARACTER 
9238 075344 005046 CLR -(SP) T NEW PS ON STACK 
9239 075346 012746 075354 MOV #643,-(SP) Sout NEW PC ON STACK 
9240 075352 000002 RTI ;zPOP NEW PC AND PS 
9241 075354 64$: 
9242 075354 005737 074462 1$: TST $STKCNT 7zWAIT ON A CHARACTER 
9243 075360 001775 BEQ 1$ 
9244 075362 005337 074462 DEC STKCNT 3 2DECREMENT THE COUNTER 
9245 075366 117766 177074 000004 MOVB a$TKQOUT ,4(SP) 23GET ONE CHARACTER 
9246 075374 005237 074466 INC $TKQOUT ;UPDATE THE POINTER 
9247 075400 023727 074466 074500 CMP $TKQOUT ,ASTKQEND “33DID IT GO OFF OF THE END? 
9248 075406 001003 BNE 2$ ; BRANCH IF NO 
9249 075410 012737 074470 074466 MOV ASTKQSRT,$TKQOUT  ;RESET THE POINTER 
9250 075416 000002 2$: RTI 7 RETURN 
9251 ZAR IIIS IOIIIDIIOIIIOIIIOIOI IOI IOI TOTO TOIT TOTTI TOT TT TOT TOT TOT IE 
9252 3*THIS ROUTINE WILL INPUT A STRING FROM THE TTY 
9253 S*CALL: 
9254 se RDLIN 32 INPUT A STRING FROM THE TTY 
9255 ;* RETURN HERE ; ADDRESS OF FIRST CHARACTER WILL BE ON THE STACK 
ase o* 7: TERMINATOR WILL BE A BYTE OF ALL O'S 
9258 075420 010346 SRDLIN: MOV rf -(SP) oF VE R3 
9259 075422 005046 CLR (SP) :CLEAR THE RUBOUT KEY 
9260 075424 012703 075654 13% MOV #STTYIN, R3 3GET ADDRESS 
9261 075430 022703 075664 2$: CMP #STTYINGS. .R3 3 BUFFER FULL? 
9262 075434 101456 BLOS 4$ 7:BR IF YES 
9263 075436 104410 RDCHR :GO READ ONE CHARACTER FROM THE TTY 
9264 075440 112613 MOVB (SP)+,(R3) *IGET CHARACTER 
9265 075442 122713 000177 10$: CMPB #177, (R3) :2IS IT A RUBOUT 
9266 075446 001022 BNE 5$ 7BR IF NO 
9267 075450 005716 TST (SP) 3318 THIS THE FIRST RUBOUT? 
9268 075452 001007 BNE 6$ F NO 
9269 075454 112737 000134 075652 MOVB #'\ ,9$ +: TYPE A BACK SLASH 
9270 075462 104401 075652 TYPE 9 
9271 075466 012716 177777 MOV #-1, (SP) 25 SET THE RUBOUT KEY 
9272 075472 005303 6$: DEC R3 ;BACKUP BY ONE 
9273 075474 020327 075654 CMP R3,A$TTYIN iE STACK EMPTY? 
9274 075500 103434 BLO 4$ 7BR IF YES 
9275 075502 111337 075652 MOVB (R3) ,9$ 13 SETUP TO TYPEOUT THE DELETED CHAR. 
9276 075506 104401 075652 TYPE 9 $2 YPE 
9277 075512 000746 BR 2s 7:G0 READ ANOTHER CHAR. 
9278 075514 005716 5$: TST (SP) ssRUBOUT KEY SET? 
9279. 075516 001406 BEQ 7$ 7;BR_ IF NO 
9280 075520 112737 000134 075652 MOVB #'\,9$ zz TYPE A BACK SLASH 
9281 075526 104401 075652 TYPE 9S 
9282 075532 005016 CLR (SP) :: CLEAR THE RUBOUT KEY 
9283 075534 122713 000025 7$: CMPB #25,(R3) z21S CHARACTER A CTRL U? 
9284 075540 001003 BNE 37BR IF NO 
9285 075542 104401 075671 TYPE »SCNTLU 7: TYPE A CONTROL ‘U"' 


9286 075546 000726 BR 1$ ::GO START OVER 


MASSBUS RH70 AND RH11_DIAGNOSTIC 


CZRHBF P11 


075550 


075722 


26-JUL-79 10:13 


leche 


075726 


000022 
001223 
075654 
001222 
075652 
075652 
000015 


177777 
001224 


000004 
075654 


000002 
000004 


000 
000012 
051127 
020127 


MACY? 7 atin 


TTY INPUT ROUTI 


8$: 


4$: 
3$: 


9$: 


$TTYIN: . 


SMNEW: 


eASCIZ 


26-JUL-79 


#22, (R3) 
3$ 

(R3) 
-SCRLF 
en 
, SQUES 
(R3) ,9$ 


#15, (R3)+ 


ASTTYIN, 4(SP) 
0 
0 
8. 
/*C/<15><12> 


/*U/<15><12> 
/*G/<15><12> 


<15><12>/SWR = 


/ NEW = / 


J1 
j 


4 
0:39 PAGE 179 


3318 CHARACTER A *"*R’"? 
ae CH_IF NO 
sCLEAR THE CHARACTER 
; TYPE A “'cR’’ g — 
Z:TYPE THE INPUT STRING 
: Tye e AtYoe ANOTHER CHACTER 
;CLEAR THE BUFFER AND LOOP 
 TECHO THE CHARACTER 


: ¢ CHECK FOR RETURN 
LOOP IF NOT RETURN 
2: CLEAR RETURN (THE 15) 
ys A LINE FEED 
AN RUBOUT KEY FROM THE STACK 
i REST ORE R3 
: ¢ADJUST THE STACK AND PUT ADDRESS OF THE 
3 FIRST ASCII CHARACTER ON IT 


; sRETURN 
eh Uh opp FOR ASCII CHAR. TO TYPE 
: TERMINAT 


+ :RESERVE 8 hie FOR TTY INPUT 
CONT ROL 
3 CONTROL “yt 


pee, _ 


SEQ 0178 
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CZRHBF .P11 26-JUL-79 10:13 READ AN OCTAL NUMBER FROM THE TTY SEQ 0179 
p+ -SBTTL READ AN OCTAL NUMBER FROM THE TTY 
9320 FIRE REE REEER EER EREREEREER AREER EER ERE ee 
9321 SS THIS ROUTINE WILL READ AN OCTAL (ASCIJ) NUMBER FROM THE TTY AND 
9322 > * CHANGE IT TO BINARY. 
9323 S*CALL: 
9324 7* RDOCT 2 ¢READ AN OCTAL NUMBER 
9325 :* RETURN HERE ;;LOW ORDER BITS ARE ON TOP OF THE STACK 
9358 ;® :zHIGH ORDER BITS ARE IN $HIOCT 
9328 075726 011646 $RDOCT: MOV (SP) ,-(SP) ah SPACE FOR THE 
9329 075730 016666 000004 000002 MOV 4(SP) ,2(SP) T NUMBER 
9330 075736 010046 MOV RO,-(SP) PUSH RO ON STACK 
9331 075740 010146 MOV R1,-(SP) ;7zPUSH R1 ON STACK 
9332 075742 010246 MOV R2,~-(SP) 3;PUSH R2 ON STACK 
9333 075744 104411 1$: RDLIN 7zREAD AN ASCIZ LINE 
9334 075746 012600 MOV (SP)+,RO 3:GET ADDRESS OF 1ST CHARACTER 
9335 075750 005001 CLR R1 3:CLEAR DATA WORD 
9336 075752 005002 CLR R2 
9337 075754 112046 2$: MOVB (RO) +,-(SP) 3zPICKUP THIS CHARACTER 
9338 075756 001412 BEQ 3$ :cIF ZERO GET OUT 
9339 075760 006301 ASL R1 i3*2 
9340 075762 006102 ROL R2 
9341 075764 006301 ASL R1 7a%4 
93%42 075766 006102 ROL R2 
9343 075770 006301 ASL R1 73*8 
9344 075772 006102 ROL R2 
9345 075774 042716 177770 BIC #*C7, (SP) 3zSTRIP THE ASCII JUNK 
9346 076000 062601 ADD (SP)+,R1 :zADD IN THIS DIGIT 
9347 076002 000764 BR 2$ $é 
9348 076004 005726 3$: TST (SP) + 3:CLEAN TERMINATOR FROM STACK 
9349 076006 010166 000012 MOV R1,12(SP) 72 SAVE THE RESULT 
9350 076012 010237 076026 MOV R2,$HIOCT 
9351 076016 012602 MOV (SP)+,R2 7zPOP STACK INTO R2 
9352 076020 012601 MOV (SP)+,R1 7z:POP STACK INTO R1 
9353 076022 012600 MOV (SP)+,RO 7 POP STACK INTO RO 
9354 076024 000002 TURN 


RTI zRE 
9355 076026 000000 $HIOCT: .WORD 0 SZHIGH ORDER BITS GO HERE 


MASSBUS 


RH70 AND 


CZRHBF .P11 


076052 
076054 
076062 


076100 


076110 


RH11 ayo aa 
10:13 


*SO-JUL=79 


076052 


073742 
075056 


000002 


076064 


000004 0000602 





L 14 
a DB oo 26-JUL=79 10:39 PAGE 181 
TRAP D SEQ 0180 


-SBTTL TRAP DECODER 


ASIII IDES ISI IIDISIOIIOIOIOIIIOIUIOISIOIOIOIIOIOOI OID IOI TOT TOT TOTTI TTT 
‘RTHIS ROUTINE WILL PICKUP THE gk, BYTE OF THE ‘‘TRAP*’ INSTRUCTION 
;*AND_USE IT TO INDEX THROUGH THE T TABLE FOR THE STARTING ADDRESS 
:*OF THE DESIRED ROUTINE. THEN USING T THE ADDRESS OBTAINED IT WILL 
:*GO TO THAT ROUTINE. 


STRAP: MOV RO,=(SP) 3 SAVE _RO 
MOV 2(SP) ,RO + 3GET TRAP ADDRESS 
TST -(RO) KUP BY 2 
MOVB (RO) ,RO :3GET RIGHT BYTE OF TRAP ” 
ASL RO sPOSITION FOR INDEXING 
MOV $TRPAD(RO),RO :: INDEX TO TABLE 
RTS RO 3:GO TO ROUTINE 


3: THIS IS USE TO HANDLE THE *'GETPRI'’ MACRO 


$TRAP2: MOV (SP) ,=(SP) 7sMOVE THE PC DOWN 
MOV 4(SP) ,2(SP) :sMOVE THE PSW DOWN 
RTI : RESTORE THE PSW 


-SBTTL TRAP TABLE 


:*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
;*BY THE ‘‘TRAP’' INSTRUCTION. 


2 ROUTINE 

$TRPAD: .WORD STRAP2 
$TYPE 33 CALL=TYPE TRAP+1(104401) TTY TYPEOUT ROUTINE 
STYPOC ;;CALL=TYPOC TRAP+2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
S$TYPOS ;;CALL=TYPOS TRAP+3(104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 
STYPON ;;CALL=TYPON TRAP+4(104404)  TYPF OCTAL NUMBER (AS PER LAST CALL) 
$TYPDS ;;CALL=TYPDS TRAP+5(104405) TYPE DECIMAL NUMBER (WITH SIGN) 


$GTSWR ;;CALL=GTSWR TRAP+6(104406) GET SOFT-SWR SETTING 


$CKSWR ;;CALL=CKSWR TRAP+7(104407) TEST FOR CHANGE IN SOF T-SWR 

$ROCHR ;;CALL=RDCHR TRAP+10(104410) TTY TYPEIN CHARACTER ROUTINE 

S$RDLIN ;;CALL=RDLIN TRAP+11(104411) TTY TYPEIN STRING ROUTINE 
a $RDOCT ;;CALL=RDOCT TRAP+12(104412) READ AN OCTAL NUMBER FROM TTY 
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CZRHBF .P11 26-JUL-79 10:13 CROSS REFERENCE TABLE -= USER SYMBOLS SEQ 0181 


= 052525 2829 3203 5477 5759 6041 6323 
013470 27864 
006372 20594 


— Ot at ot tt we 
VINI VIO OO OOOO 


012326 
000010 
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CZRHBF P11 26-JUL-79 1 
BEGIN2 004166 18014 
BEGINS 004152 497 
BEHIND 046062 65634 
BITCNT 003446 7504 
2780* 
2933* 
3218* 
3356* 
3854* 
4122* 
4273* 
4437* 
4641* 
4803* 
4964* 
5122s 
5283* 
5486* 
5629 
5780* 
5926* 
6127* 
6273* 
58 
BITO = 000001 684 
1T00 = 000001 4584 
BITO1 = 000002 4574 
BITO2 = 000004 4564 
BITO3 = 000010 4554 
BITO4 = 000020 4544 
BITOS = 000040 4534 
BITO6 = 000100 4524 
BITO7 = 000200 4514 
1T08 = 000400 4504 
BITO9 = 001000 4494 
BIT1 = 000002 4674 
BIT10 = 002000 4484 
BIT11 = 004000 4474 
BIT12 = 010000 4464 
BIT13 = 020000 4454 
BIT14 = 040000 4444 
BIT15 = 100000 4434 
BIT2 = 000004 4664 
BITS = 000010 4654 
BIT4 = 000020 4644 
BITS = 000040 4634 
BIT6 = 000100 4624 
BIT7 = 000200 4614 
BIT8 = 000400 4604 
BIT9 = 001 4594 
BLIP 044602 6409 
BLITZ 044512 64004 
BLKTST 050370 6406 
BLO = 000040 16314 
BL1 = 000100 16324 
BL2 = 000200 16334 


MACY11 30A(1052) 


26-JUL-79" 


CROSS REFERENCE TABLE == USER S 


460 8683 
459 8691 9055 


6411 64164 


SYMBOL S 


N 14 
10:39 PAGE 184 


6 
6768* 


SEQ 0182 
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003422 


003424 


050114 


014 
013414 


MACY11 30A(1052) 


64824 


6777 
3762 


} 
26-JUL-79 


2863* 
4354 


15 
10:39 PAGE 
CROSS REFERENCE TABLE -- USER SYMBOLS 





SEQ 0183 


3079 
4253 


4725 
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CZRHBF .P11 26-JUL-79 10:1 
DBTSTA 013734 2817 
aor ta = 177570 390" 
DELTA. 015650 3102 
DEVCNT 003376 16624 
DEVIC1 003 Het 
DEVIC2 003370 16584 
DEVICS 003372 16594 
DEVIC4 003374 16604 
DEVICS 34 16634 
6561 
DF 1 072350 624 
DFI05 = 072424 1144 
vF11 072374 674 
DF132 4 4©6072431 1261 
DF170 072437 1428 
DF172 072442 1059 
DF2 072354 631 
DF3 2 637 
DF 34 072377 851 
DF 35 072402 877 
DF 36 072403 868 
DF4 072 643 
DF41 072406 896 
DFS 072370 4 
DF52 072410 965 
DF71 072415 1069 
DF 76 072420 1100 
1 067636 622 
DH105 9071222 1142 
DH11 070444 672 
DH111 = 071267 1163 
DH121 71334 1208 
DH130 39071372 1249 
DH132 1420 1259 
DH142. (071476 1301 
DH146 «=—071534 1322 
DH147 =071601 1196 
DH170 §=071637 1426 
DH171 =: 071665 857 
DH172 = 071713 1055 
DH2 067756 629 
DH3 070077 635 
DH34 070532 847 
DH35 70607 873 
DH36 070612 864 
DH4 070217 641 
DH41 070673 892 
DHS 070337 ot 
DH52 070717 961 
DH71 071016 84214 
DH72 071075 065 
DH76 071164 1098 
DISPLA 001142 5734 


28254 


MACY11 30A(1052) 
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1485 
679 
802 


84294 
9038* 


6502 6517* 6578 
1953 1956 1959 2023 


1977 1980 6528 6530 
1998 rey} 6539 6541 


2020 6 
2023* 2031 2038 6514* 


1324 85814 
1288 85834 


1492 1497 1502 85754 
691 699 708 719 
812 822 830 841 


1318 1330 1335 1340 


1286 84674 


84874 


1490 1495 1500 84054 
689 697 706 717 
810 820 828 839 


2029 2413 


6536 
6547 


6519*  6530* 


731 738 
85694 
1346 1462 
729 736 
83634 


6512 


6541* 


748 


1467 


746 


SEQ 0184 


6514 


6552* 


757 


85794 


755 
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CZRHBF.P11 = 26=JUL-79 10:13 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0185 

DISPRE 000174 

DLT = 100000 1541 2143 3148 3290 3395 3485 3592 3697 3800 3901 4002 4090 6810 

= 000001 15984 5337 5344 5349 5350 5351 5352 54678 5485 5490 5491 5492 5493 

5619 5626 5631 5632 5633 5634 5760 5767 5772 5773 5774 5775 5901 
5 5913 «5914 «Ss «5915 «5916s 6049 6054 6055 6056 6057 6183 61% 
6195 6 6197 6198 6324 6331 6336 6337 6338 6339 

DNO = 000001 16254 

DN] = 000002 1626# 

DN2 = 000004 16278 

DOCC = 000400 1 

DOIT 007632 2244 2256 22624 

DPCA = 000040 16034 

DPE = 000020 1590# 2158 3151 3803 3904 

DPEHI = 040000 1554# 2127 3149 ©3291 «3396S 3698 

DPELO = 020000 15534 2127 3149S 3291S 3396 = 3593 =: 3698 

DPR = 000400 15804 6805 

DR 003430 16864 

DRCLR = 000011 1739" 

DRY = 000200 15798 6805 

DSWR = 177570 $89" 572 1835 

DS1 3432 1587# 2238" 2287 23278 2374% 2512 25478 2574" 2598" 26478 2687* 2715* 27398 
2798% 2854" 2893*  2948%  3032% 3127 32698 3374n 3464" 35718 3676% 3779% 3880* 
3981" 4077* 4142 4191" 4241" «4291 «= 346% «= 4399" 4.452% 4505" §«4558% 4611" 604" 
4717* 4770" 4823% 4876* 4929" 4982x 5040* 5075" 5137" 51778 52428 5301" 53778 
5442% 5518% 5583" 5659x 5724x 5800* 5865* 5941%  6006* 6082" 6147" 6223*  6288* 
6364" 6446" 

DT 003434 16884 8525 

STE = 010000 15934 2158 3151 3803 3904 

DTRM = 16054 

DT1 072004 623 1105 «= 1128 = 85134 

DT105 072166 1143 1148 += 85374 

DT11 072066 673 1203 85234 

DT111 072202 1164 1169 1175 8539" 

DT121 072216 1209 1214 1461 85414 

01130 072230 1250 1255 8543" 

DT132 072240 1260 1266 1272 1277 1282 1287 8545# 

DT142 072256 1302 1317 85484 

01146 072270 1323 8550# 

DT147 072 1197 1329-1334. «1339=Ss«11345 = 85528 

DT170 072316 1427 85544 

DT171 072326 858 85564 

DT172 072336 1057 85584 

DT2 072016 6 1111 «111685154 

DT3 072030 636 85174 

D134 072076 849 85254 

DT35 =: 072106 875 885 8527" 

D136 =: 072112 85284 

014 072042 642 8519" 

D141 072122 896 1471 1476 1481 1486 1491 1496 1501 

DTS —- 072054 648 655 660 666 680 690 698 707 718 ###(.730 737 767 756 

766 (773 783 79% 803 811 821 829 840 85218 

D152. 072130 963 85314 

DT71 = 072144 1067 1077 +1085 «©1093 «= 85334 

D176 072154 1099 85354 

T 047660 6414 67678 


DUPOR 1 
DVA = 004000 15714 3114 3256 3361 3451 3558 3663 3766 3867 3968 6790 
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OfOrm NNN 
. 
& 


CZRHBF .P11 26-JUL-79 10:13 CROSS REFERENCE TABLE -= USER SYMBOLS SEQ 0186 
DYNO 020704 3547 3552 3554 35564 
EMTVEC= 000030 4784 1820* 1821* 
EM1 055074 620 73074 
EM10 055643 663 73724 
EM100 060777 1108 76704 
EM101 061 1114 76804 
EM102 = 061131 1119 76884 
EM103 061162 1124 76934 
061 1131 77124 
EM105 061531 1139 773 
EM106 061576 1146 77404 
EM107 061624 1151 77444 
EM11 055677 669 73774 
EM110 061733 1156 77564 
EM111 062025 1162 77 
EM112 0621 1167 — 77744 
EM113 062125 1172 77784 
EM114 062222 1178 77894 
EM115 0623 1184 78 
EM116 062432 1189 78134 
EM117 0624 1194 78184 
EM12 055740 676 73834 
20 06256 1200 78 
EM121 062623 1206 78354 
EM122 90627 1212 78454 
EM123 062740 1217 78504 
EM124 063013 1224 78584 
EM125 063106 1230 78694 
EM126 063202 1236 78804 
EM127 063273 1242 78 
EM13 055760 684 73864 
EM130 063371 1248 79014 
EM131 063443 1253 79094 
M1 063475 1258 79144 
EM133 063531 1263 79194 
EM134 063632 1269 79314 
EM135 063713 1275 79404 
M1 063747 1280 79454 
EM137 064030 1285 79544 
EM14 056027 694 73934 
EM140 064131 1290 
EM141 064 1295 79744 
EM142 064262 1300 79824 
EM143 0643 1305 79894 
M144 064410 1310 79974 
EM145 064476 1315 80074 
EM146 = 0064545 1320 80144 
EM147 0646 1326 80214 
EM15 056053 70 73974 
50 0647 133 80314 
EM151 065037 133 80474 
EM152 065141 134 

EM153 065211 134 8 

EM154 065275 135 80764 

EM155 65 136 80 

EM156 065454 1366 80964 


MASSBUS RH70 AND RH11 Sey et eb 


CZRHBF .P11 26-JUL-79 10:1 

EM157 065545 1372 
EM16 056077 711 
EM) 065641 1378 
EM161 065730 1384 
EM 066017 390 
EM163 066106 1395 
EM164 066164 1401 
EM165 066253 1407 
EM166 066351 1413 
EM167 066430 1419 
EM17 056117 721 
EM171 066527 1430 
EM172 066601 1437 
EM173 066622 1443 
EM174 066706 1449 
EM175 = 066737 1454 
EM176 066777 1459 
EM177 067032 1464 
EM2 055134 626 
EM20 056166 734 
EM200 067077 1469 
EM201 067161 1474 
EM202 067243 1479 
EM203 067325 1484 
EM204 067405 1489 
EM20S5 067472 1494 
EM206 067556 1499 
EM207 7602 1504 
EM21 056217 741 
EM22 056246 751 
EM23 56301 760 
EM24 056320 770 
EM25 056351 777 
EM26 056403 787 
EM27 056431 800 
EMS 055174 633 
EM3O 056464 807 
EM31 056521 815 
EMS2 056560 825 
EM33 056607 833 
EM34 056657 844 
EMSS 056727 854 
EM36 056761 862 
EM37 057017 871 
EM4 055250 639 
EM4O 057050 880 
EM41 057210 889 
EM42 057313 900 
EM43 57364 908 
EM44 57430 914 
EM45 057522 922 
EM46 057575 929 
EM47 057656 936 
EMS 055310 645 
EMSO 057727 943 
EMS1 950 
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SEQ 0187 
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EMS2 060037 956  7580# 

EMS3 = 0602712 98 76 

EMS4 ©: 060220 974 76014 

EMSS 060225 980 76024 

EMS6 ©: 060232 986 76034 

EMS7 060240 992 7604 

EM 055361 651 73404 

EM60 060246 998 76054 

EM61 060253 1004 76 

EM62 060260 1010 76074 

EM63 060265 1016 76084 

EM64 060273 1022 761 

EM65 060300 1028 76114 

EM66 © 060306 1034 76128 

EM67 060313 1020 76134 

EM? ss 055575 658 73654 

EM70 060321 1046 76154 

EM71 060327 1052 76178 

EM72 060416 1062 76274 

EM73 060453 1072 76324 

EM74 060502 1081 76 

EM75 060530 1089  7640# 

EM76 060560 1096  7644# 

EM77 060665 1102 76564 

ENDPAS 045174 64934 

= 004000 1609 

ERPIP 025530 4250 42534 

ERR = 040000 15834 2151 6450 

ERRIP 925512 4246 42494 

ERRTST 050244 2094 2200 2213 «2263S 2303 «= 2343 2406 = 2472S 2518 = 2615S 2657 = «2758 ~=— 2907 
2986 3080 3188 3330 3435 3525 3632 3737 3840 3941 4042 4103 4155 
4204 4254 4304. 4359 4412446504518 = 4571 4624S 4677 «4730S 4783 4836 
4889 4942 4995 50 5198 5259 5325 5400 5466 5541 5607 5682 5748 
5823 5889 5964 6030 6105 6171 6246 6312 6387 6484 68454 

ERRVEC= 000004 471# 1833 1834* 1845" 1882x 1883" 1915" 1918* 1921* 19248 1927% 1931* 1935 
2045 2046" 2060" 2065+ 20662067 2070" 2078-2079 2084 2095 8674 8675+ 

ca * 

ERR1 2 2091 2094 

ERR10 013302 2725 2745 

ERR11 014460 2902} 

ERRZ 7266 21642 2200# 

ERR29 026006 4300 43034 

ERR3 011152 2418 2422 2434 24724 

ERR3O 024502 409% 4 41024 

ERR4 7330 2211 22134 

ERKS 011440 499 25184 

ERR6 012206 583 26034 

ERR? 012520 2653 ©. 2656# 

ERTIP 034116 5182 5185 

ER1 003436 1689# 2239" 2288* 2328  2375* 2513*  2548%  2575% 2599%  2648%  2688* 2716* 2740s 


ERIR 025252 4200 42034 
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SYMBOL S SEQ 0189 
43 
51 
59 


CZRHBF P11 26-JUL-79 10:13 CROSS REFERENCE TABLE == USER 
EVENAD 004000 4166 4216 4266 19 4372 4425 4531 90 96 4902 
495 50 12% 5151 5207 5336* 5483 
00* 5906 5955 6047 6182* 6188 
6375 6378 8548 
FAKE70 006530 
F ANG 


2074 2089 
6694 6698 
9389 9390 
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CZRHBF .P11 26-JUL-79 10:13 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0190 
HED20 §=051233 69544 
HED21 051275 69604 8607 
051337 8608 
HED23 051402 6972# 8609 
HED24 051456 69804 861 
HED25 051520 69 8611 
HED26 §=051562 69924 8612 
HED27 051624 69984 8613 
HED3 050463 68844 8593 
HED 30 51666 70044 8614 
HED31 051730 70104 8615 
HED32 051775 7017# 8616 
HED33 052055 70264 8617 
HED34 = 052132 70344 8618 
HED35 052207 70424 8619 
D 052265 70504 8620 
HED37 = 052341 70584 8621 
050522 68904 859 
HED4O 38052433 706: 8622 
HED41 052520 7077# 
HED42 052564 70834 8624 
HED43 = 052635 70 2 
HED44 §=052713 70984 8626 
HED45 53002 71084 8627 
HED46 5 71144 8628 
HED47 = 053132 71234 8629 
D 050561 68 8595 
HEDSO 8 053211 71314 8630 
HEDS1 053276 71404 8631 
HEDS2 053355 71484 8632 
HED53 53434 71564 8633 
HEDS4 053500 71624 
HEDSS 053544 71684 8635 
HEDS6 53603 71744 8636 
HEDS7 053657 71824 8637 
HED6 050612 69014 85 
053726 71894 8638 
HED61 054001 71974 9 
HED62 389054047 72044 8640 
HED63 054122 72124 8641 
HED64 054171 72194 
HED65 054244 7227H# «©8643 
HED66 8054312 72344 8644 
HED67 366 72424 8645 
HED? 4 69 8597 
HED70 054435 7249% 8646 
HED71 = =054511 72574 
HED72 054557 72644 8648 
D 054633 72724 =§=—68.649 
HED74 054702 7279% 8650 
HED75 054756 72874 
HED76 55024 72944 2 
HERADD= 177742 16694 6744 
RE 7362 22264 
HIBYTE 012242 2607 


26094 
HT = 000011 3814 8788 8829 
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010516 23814 
000010 4051 


3451 3558 3663 3766 3867 3968 5214 5215 


3593 3698 6815 
3904 


5915 5916 6042 6049 6054 6055 6056 


51974 


2822* 6400* 





K 1 
MASSBUS _RH70 AND RH11_DIAGNOSTIC MACY11 30A(1052) 26-JUL=79 10:39 PAGE 194 
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MOL = 010000 15814 6805 

MOOR 046576 66574 6686 

MORE 046732 66724 6682 

MORE2 046722 66704 6676 

MPE = 000400 iaaee 2143 3148 3290 3382 3431 3485 3592 3697 3800 3901 4002 4090 

MPETST 024412 4082 40854 

MXF = 001000 15354 2143 3148 3290 3395 3485 3592 3697 3787 3836 3901 3954 3956 
3961 3989 4038 4090 6810 

MYSTIC 014300 28814 

NEBL = 000100 16044 

NED = 010000 iaaee 2143 3148 3290 3395 3485 3592 3684 3733 3800 3901 4002 4090 

NEDERR 021364 3645 36474 

NEM = 004000 tg 2143 3135 3184 3290 3395 3485 3592 3697 3800 3901 4002 4090 

NEXTST 046620 6650 6659 66624 

NOOP = 000001 17074 

OAB = 125252 6 2579 2721 2867 3240 5273 5336 5414 5555 5618 5696 5836 $900 
5977 6118 6182 9 

OABTST 014300 2871 2876 2878 28804 

004002 oe prt 4584 4637 4743 4849 5013* 5112 5150* 5388 5529 5670 5811 

OFFSET 003456 17594 6829  6830* 6832 

OFF11 003402 16674 2031* 2033 2034* 2038* 2039* 2040 2041* 2042 6561* 6563 6566* 6568+ 
6569* 6570 6571* 6572 

ONE = 000001 17014 2530 2698 2773 2818 2825 6655 6670 

OPI = 020000 15944 2158 3151 3803 3904 

OR = 000200 15334 2352 2357 2378 2383 2388 2396 2400 2806 2832 2837 2858 2870 
2875 2897 6795 6810 

ORSET 013642 2807 28104 

50366 6846 6848 68614 

PARITY 047234 879 67184 

PASS 003452 17524 =6399* 6410 6478 6480* 

PAT = 000020 15304 3346 3748 6795 6810 

PGE = 002000 be 2143 3148 3290 3395 3485 3592 3697 3800 3888 3937 4002 4090 

PGETST 022770 3856 3861 3863 38654 

PIP = 02 15824 6805 

PIRQ = 177772 3884 

PIRQVE= 000240 4824 

PLACE 02 3538 35404 

PRIBIT 046772 56 668 

PRIBIT 046762 6671 66794 

PRO = 4054 

PR1 = 00004 4064 

PR2 = 000i 407# 

PRS = 000140 4084 

PR4 = 0002 4094 

PRS = 000240 4104 

PR6 = 000 4114 

PR7 = 000340 4124 

PS = 177776 3854 386 5212* 

PSEL = 002000 15704 3114 3256 3361 3451 3558 3663 3766 3867 3968 6466 6767 6790 

PSW = 177776 3864 6398* 


PWRVEC= 000024 477# =1824* 1825* 8720* 8721* 8730*  8736* §&748* 8749s 
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RBUF 004100 17684 2166* 2171* 2176* 2181* 2188* 2193* 3344 3750 5271 5272* 5310 5312 
5412 5413* 5451 5453 5553 5554* 233% 5594 5694 5695* 5733 5735 5835 
5836* 5874 5976 5977* 6015 6117 6118* 6156 6258 6259* 6297 6727* 6728+ 
6729 6735* 6736 6744* 6745 6751* 6752 6758* 6759 8533 8552 

RBUF1 004102 1769% ( 

RBUF2 004104 17704 

RBUFS 004106 17714 

RBUF4 004110 17724 

RBUFS 004112 17734 

RBUF6 004114 17744 

7 004116 17754 

RDCHR = 104410 9263 939 

RDLIN = 104411 9333 93974 

RDOCT = 104412 1898 1 1910 1949 1970 991 2012 93984 

RDY = 000200 15674 2776 2781 2802 2926 2931 2952 3010 3015 3101 3 3114 3131 

3211 3223 3228 3234 3243 3248 3256 3273 3349 3354 3 3378 

3451 34 3546 3551 3558 3575 3651 3656 3663 3680 3754 3759 3766 


4382 4403 4430 4435 4456 4483 4488 4509 4 4541 4 4589 4594 

4615 4642 7 4668 4695 4700 4721 4748 4753 4774 4801 48 4827 

4854 4859 4880 4907 4912 4933 4960 4965 4986 5018 5023 5044 5053 
5058 0 5115 5120 5141 5155 5160 5181 5220 5225 5246 5279 5284 
3 5355 5360 5382 5420 5425 5447 5496 5501 5523 5561 5 


6780 6790 

RDYSET 013622 2803 28064 

READY 034226 5209 52114 

READO = 000071 17194 3099 3345 4322 4693 4746 4905 5277 5484 

READ1 = 000072 17204 

READ2 = 000073 17214 5418 5766 

ADS = 000074 17224 

READ4 = 000075 17234 5559 6048 

READS = 000076 17244 7 

READ6 = 000077 17254 3114 3256 3361 3451 3558 3663 3766 3867 3968 4799 4852 4958 
5700 6330 6790 

ND 3404 16714 = =1804* 1911* 1912* 2039 6569 

RESTAR 006110 1925 192 1933 1937 1979 2000 2019 20234 

RESTAT eteted yi B 2018 6503 65174 29 6540 6 

RETAIN 003410 16734 1960* 1981* 2002* 2021* 2024* 2062 6515* 6526* 6531* 6542* 6553* 

RETURN 046754 6674 66774 

RFAIL = 000100 15924 2158 3151 3803 3904 

003346 2427 

RHBA 003334 16434 2229 2272* 2273 2278 2291 2294 2 2318 2365 2503 2538 2565 
2589 26 2671* 2672 2673 2678 2699* 2700 2701 2722* 2723 2724 
27 2745 2746* 2748 2752 = 2754 2789 2845 2 2923* 39 3001* 3023 
3050 3090* 3093* 3118 3202*  3239* 3260 3344* 365 5 3543* 

8 3750* 3770 3848* 3871 3972 & 4115* 41 4166* 4216* 

4232 4266* 4319* 337 4372x 4390 4425% 4443 4478* 4496 4531* 4549 
4584* 4602 4637* 4655 4690* 470 4743* 47 4796* 4849» 7 4902* 
4920 4955* 73 5011* 31 5049* 5066 5111* 5128 5151* 5207* 33 
5271* 92 5342s 5368 5 5412* 5433 5483* 5509 55 5553* 74 5624* 


52 388 55 
5650 5670 5694* 5715 5765* 5791 5811 5835* 5856 5906* 5932 5952 5976* 





MASSBUS RH70 AND RH11_DIAGNOSTIC 
26-JUL=79 10:13 


CZRHBF P11 

RHBAE 003360 
RHCS1 003330 
RHCS1B 003364 
RHCS2 003340 
RHCS3 003362 


6117* 


6138 


2312* 
2630* 
30 


6188* 
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SEQ 0194 
6355 
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. 044672 
003342 


003350 


58 2 
6184* 6325* 


011642 
011460 





MASSBUS RH70 AND RH11_ DIAGNOSTIC 
26-JUL-79 10:1 


C7RHBF P11 
RH11 006574 
RHI1BA 006442 
006536 
RH70TT 006504 
RITEON 033336 
RITURN 046760 
RMBEX = 0 
RMR = 
ROTEEN 045640 
S 005330 
sc = 
SCLK = 000010 
SEARCH= 000031 
SKIPIN 004660 
SLEUTH 004674 
SLKM = 001000 
SNAFOO 010622 
SPLIT 034522 
SRO = 177570 
SRI = 177574 
SR2 = 177576 
SR3_ = 172516 
STACK = 000750 
TART 214 
STKLMT= 177774 
SUPER 033312 
SWR 00114 
SWREG 000176 
SwO = 000001 
SwOO = 000001 
swO1 = 000002 
SwO2 = 000004 
SwO3 = 000010 
SwO4 = 000020 
SwOS = 000040 
SWwO6 = 000100 
SwO7 = 000200 
SWOB = 000400 
SwO9 = 001000 
Swi = 2 
Swi0 = 002000 
Sw11 = 004000 
swi2 = 010000 
Sw13 = 020000 
Sw14 = 040000 
Sw15 = 100000 
Sw2 = 000004 
Sw3 = 000010 
Sw4 = 000020 
Sw5 = 000040 
Sw6 = 000100 
Sw7 = 000200 


2077 
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YMBOL S 
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2082 


5626 
5913 


5253 
1880 
18094 
1835* 
9051 
1850 


6635 
3321 


20924 


1837 
9055 
9107 


6825 
3426 


Wo 
wo 
— tS 
On 


3623 


8669 
9201* 


3728 


8683 


3831 


8685 


3932 


8691 


4033 


8698 


3388 
3694 
4012 


5774 
6057 


8728 


SEQ 0196 


5775 


8741* 
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6849*  6850* 
8533 8535 


02 
024512 
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CZRHBF.P11 =. 26=JUL=79 10:13 CROSS REFERENCE TABLE == USER SYMBOLS SEC 0198 
TST33 025004 4113 41624 
TST34 025262 4164 4210# 
TST35 025540 4214 42624 
TST 026016 4264 4315¢ 
TST37 026310 4317 G 
4 007334 22214 
TST40 026602 370 = 44218 
TST41 027074 4423 4474" 
TST42 027366 4476 45274 
TST43 027660 4529  4580# 
TST44 030152 4582 46334 
TST45 030444 4635 46 
TST46 030736 4739" 
TST47 031230 4741 4792# 
TSTS 007642 22714 
TST5O 031522 47% 4845 
TST51 032014 4847 48984 
TST52 032 4900 49514 
TST53 032 4953 5004" 
TST54 033372 5105¢ - 
TST55 034176 52054 
TST56 © 034532 2 
TST57 035074 53344 
TST6 = 01 23 
TST60 035526 54094 
TST61 036070 54754 
TST62 036522 5550# 
TST63 037’ 56164 
TST64 037516 56914 
TST65 5757# 
TST66 040512 5832 
TST67 041054 58984 
TST? —- 010312 2311 23494 
TST70 041506 59734 
TST71 042050 60394 
TST72 042502 61144 
TST73 043044 618 
TST74 043476 62554 
TST75 044040 63214 
TST76 044472 63944 
TST77 045172 64914 
TWANG 033350 5088 50924 
TWANGY 033362 5090 5095# 
T = 2 17024 2034 2435 2670 6566 6701 6728 
TYPDS = 104405 6608 6615 6681 6685 93914 
TYPE = 104401 1859 1863 1894 1900 1906 1945 1966 1987 2008 2025 2072 2087 2440 


6504 6508 6520 6532 6543 6554 6602 6609 6616 6651 6666 6677 6692 
6696 6704 A 6723 on Tos gine ee: 6834 6835 6851 6857 8750 


8793 8889 8964 8981 8998 03 05 9009 9016 9041 99049 9101 
9113, 9167 -9168-—S «9171S «9182-9192, «9208'S s«9222,—Ss«9270S «9276S «9281Ss«9285 
9291 9293 9296 9300 93874 

TYPOC = 104402 2030 6513 6525 6537 6548 6559 6703 6710 6730 6737 6746 6753 6760 
6856 8989 13 9170 «=: 93884 

TYPON = 104404 9390# 

TYPOS = 104403 9389" : 

UPE = 020000 1539 2143 «= 3148 = 32903395 3449 = 3472S «3521S 3579 = -3628)~=S (3697 = 3800 =~ 3801 
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6810 
3357 33594 


2261 . 2562 
2905 


2277* 364 2537+ 
26 2788 2 


0490000 
033764 
010000 


64 
17 
17 
17 
17 
17 
17 
17 
He 
19 
17 
17 
173 
17 
17 
17 








MASSBUS RH70 AND RH11 es hes MACY11 30A(1052) 


CZRHBF P11 26-JUL-79 1 
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$395 
5699 
6187 


9963 


6260 


6263 


9005 


3799+ 
3800* 
38%1* 


9049 


4001* 
4002* 
4003* 


9063 


4089* 
4090* 


PRMORRE TTR 4 KERRIER jigy ee Te ren GEER ER Ie 


i + = 202 


9203 


3934 
5818 
8687 


8533 
9043» 
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CZRHBF .P11 26-JUL-79 10:13 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0201 
SITEMB 001114 5604 8984 9045* 9063 
SLF 001224 6014 8829 9063 9300 9310 
SLPADR 001106 557#@ 1829* 6711 6761 8693* 8708* 8713 8715 
SLPERR 901110 5584 1830* 8693 8709* 8715 9057 
SMAIL = *exeee 1847 1850 8708 8782 9051 
SMNEW 075714 9171 93154 
SMSWR 075703 9168 
SMXCNT 073114 8706 87154 
001154 5784 
SNWTST= 1 18694 187 20954 2097 22014 22164 2218 22644 2266 23044 23 23444 
6 24074 24754 25214 23 26204 26604 2 27614 763 
29114 30824 3084 31914 3193 33328 334 34378 9 35284 
3530 37404 3742 38414 3 39424 40444 4046 41054 4107 
4156 4158 42054 42554 43074 4309 4362 4413 4415 44664 
4 45194 4521 45728 46254 4627 46784 4680 47314 4733 47844 4786 
48374 4839 48 4892 49434 4945 “ 4998 50984 5100 52004 5202 52604 
5262 53264 5328 54014 5403 54674 5469 55424 5544 56084 5610 56834 
5749% 5751 58244 5826 8 59654 5967 60314 6033 61064 6108 61728 
6174 6247# 6249 63134 6315 63884 6390 64864 6488 
SCCNT 073736 8861* 8890" 89034 
SOMODE 073740 8856*  8860* 8865 8868*  8379% 89054 
SOVER 073100 8670 86 8694 8704 87124 
SPASS 5534 6594* 6595* 6606 6628 8700 8776 
R 073264 8751 87504 
SPWRON 073116 1824 87204 8748 
SPWRMG 073252 87514 
SPWRUP 073170 8730 87364 
SQUES 001222 5994 8829 9063 9222 9293 9310 
SRDCHR 075330 92354 9396 
SRDDEC= *eee%% 9399 
SROLIN 075420 92584 9397 
SRDOCT 075726 93284 9398 
$RDSZ = 10 92514 
SREGAD 001160 5824 
$REGO 001162 5844 2247* ©53* 2257 2293% 2298% 2333* 2338* 2426* 2431 2486* 2487 2490 
2492*  2495* 4 2498 2530* 2531 2532 2552 2554* 2556* 2557 2559 2579* 
25 2582 2629* 2630 2632 2652 2654* 2670* 2671 2673 2693 2695*  2697* 
2698* 2699 2701 2721* 72 724 2773* 2811 2816 2823* 2829% 28 
2 2867* 2868 2901 2960* 2965* 2973 3113" 3114* 3137 3139 3141 3145 
3156 3158 3255*  3256* 3279 3281 3283 3287 3298 3300 3360*  3361* 
33 3392 3403 3405 3450* 3451* 3474 3476 3478 3482 3493 3495 
3543 3557* 3558* 3581 583 3585 3589 3600 3602 3662*  3663* 
3690 94 3707 3765*  3766* 3789 3791 3793 3797 3808 3810 3866* 
3867* 3892 3894 3898 3909 3911 3967*  3968* 3993 999 


$REG] 001164 5854 
0011 5 

$REG3 001170 5874 
$REG 001172 88H 2209 2210 3202 3203* 3239 3240 3648 
$REGS 001174 5894 1798*  1799* 1889 1893s 

HBA 004136 17894 2745* 2747" =—2751" 27538 

HDB 004140 1790# : 
$RHWC 004142 17914 2603* 2605" 2609" 26118 
$RTNAD 046410 66274 
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SR2A = xeeeee 9399 

SSAVRE= **eeee 9399 

SSAVR6 073262 8729* 8737 8738* 8739 87554 

SSCOPE 072644 1818 86674 

SSETUP= 000117 18104 1817 1818 1820 1822 1824 1826 1827 1829 1847 6592 8668 9035 
9054 9062 9105 9110 9111 9141 9317 

$SS1 = 000090 18574 

$ST 004132 17874 2148 3150* 3292% 3397% 3487* 3594% 3699%  3802* 3903* 4004+ 

SSTUP = 177777 18104 

SSVLAD 073052 8678 87074 

SSVPC = 000214 5394 544 

$SWR = 167700 3514 362 366 367 368 369 370 371 372 596 597 598 1826 
1827 1829 1830 1878 2103 2207 2222 2272 2310 2350 2413 2481 2530 
2627 2669 2770 2918 9 3088 3197 3339 3444 535 3642 3747 3847 
3950 4050 4112 4163 4213 63 4316 4369 4422 4475 4528 4581 6 
4 4740 4793 4846 8 4952 5005 5106 5206 5269 5335 5410 5476 
5551 5617 5692 5758 5833 99 5974 6040 6115 6181 6256 6322 6395 

92 6587 6593 0 6626 6628 8659 8660 8661 2 8663 8681 

8683 8684 8687 8688 8689 86 8697 8698 8709 8712 8715 8752 9026 
9027 9028 9029 0 9039 9046 9051 9063 

SSWRMK = 372 373 8664 8685 

STIMES 001212 5 1826* 1878* 2103* 2222% 2996* 5005* 6577* 6593*  8696* 8703 8706* 8715 

$TKB 001146 5754 97 9122 9150 9177 

STKCNT 074462 90674 9081* 9111 9128* 9242 9244* 

STKINT 00 1856 90814 9102 9163 

STKQEN= 074500 90714 9136 9247 

STKQIN 074464 9082* 9083 9134* 9135* 9136 9138* 

$TKQOU 66 90694 9083* 9245 9246* 9247 9249 

STKQSR 074470 90704 9082 9138 9249 

$STKS 001144 5744 9087* 9118* 9120 9126* 9148 9164* 9174 9186* 9206* 

STKSRV 074550 9084 90974 

T 001176 5904 
STMP1 001200 591# 2250% 2259% 2294% 2299% 2334% 2339% 2489% 2534% 2561* 2584% 2634% 2675 


STMP2 001202 5924 6646*  6663* 6670 6672* 

STMPS 001204 9 2923 2963 29 6647* 6648* 6649 6655 6657* 

STMP4 001206 5944 6700* 6701* 6702 6708* 6709 

$TMP5) = 001210 S95H# 2104* 2105* 2161 2163* 2184 

$™N = 000 3514 362 9 18784 2095 21034 2201 22074 2216 22224 2 2272# 2 
23104 2311 2344 504 2407 24134 2475 24814 2484 25304 2620 26274 
2628 2660 26694 2 27704 82911 29184 29 29 30 30 3191 31974 
3332 33394 3437 34444 3528 35354 3636 36424 3740 3747# 83 8474 
39504 4044 40504 4105 41124 4113 41634 4164 205 4213 4214 
42634 4264 4307 164 4317 4360 43694 4370 4413 44224 4423 4466 4475# 
4476 4519 45284 4529 572 45814 4625 46344 4678 4687# 4 
4731 47404 4741 4784 47934 4794 4837 48464 4890 48994 4900 4943 
4952 4953 4996 50054 5098 51064 5200 52064 5260 52694 5326 53354 5401 
54104 5467 54764 5542 55514 5608 56174 5683 56924 5749 57584 5824 58334 
5890 58994 5965 59744 6031 60404 6106 61154 6172 61814 6247 62564 6313 
63224 6388 63954 6486 64924 

001152 577# =8818* 8829 

STPFLG 001157 5814 8776 8829 

$TPS 001150 5764 8816 8829 

$TRAP_ 076030 1822 93644 

$TRAP2 076052 93754 9386 


ear RH70 AND RH11 TPs | ee 











MACY11 30A(1052) 
CROSS REFERENCE TABLE =~ “USER § 


93894 
6576* 
9273 
9387 
8811 
88274 
9390 





a” 39 nae 205 
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- ABS. 076112 


ERRORS DETECTED: 0O 


CZRHBF .BIN. CZRHBF .LST/CRF /SOL/NL : TOC= CZRHBF . SML , CZRHBF . P11 
RUN-TIME: 73 104 10 SECONDS 
RUN-TIME RATIO: 433/189=2.2 
CORE USED: 36K (71 PAGES) 





